|
Программа расчёта даты 15-е нисана по еврейскому календарю по формулам Гаусса CLS 0 INPUT "G="; G 1 A = G + 3760 a1 = (12 * A + 17) MOD 19 b = A MOD 4 f = 32.0440933# + 1.5542418# * a1 + .25 * b - .00317779# * A M = INT(f) m1 = f - M c = (M + 3 * A + 5 * b + 5) MOD 7 IF c = 1 AND a1 > b AND m1 >= .63287037# THEN IF M + 2 < 32 THEN PRINT "Еврейская пасха"; M + 2; "марта (с.ст.)": D = M + 2: GOTO 2 IF M + 2 > 31 THEN PRINT "Еврейская пасха"; M + 2 - 31; "апреля(с.ст)": D = M + 2: GOTO 3 END IF IF (c = 2 OR c = 4 OR c = 6) THEN IF M + 1 < 32 THEN PRINT "Еврейская пасха"; M + 1; "марта(с.ст.)": D = M + 1: GOTO 2 IF M + 1 > 31 THEN PRINT "Еврейская пасха"; M + 1 - 31; "апреля(с. ст.)": D = M + 1: GOTO 3 END IF IF c = 0 AND a1 > 11 AND m1 >= .89772376# THEN IF M + 1 < 32 THEN PRINT "Еврейская пасха"; M + 1; "марта(с. ст.)": D = M + 1: GOTO 2 IF M + 1 > 31 THEN PRINT "Еврейская пасха"; M + 1 - 31; "апреля(с. ст.)": D = M + 1: GOTO 3 END IF IF M < 32 THEN PRINT "Еврейская пасха"; M; "марта()": D = M: GOTO 2 IF M > 31 THEN PRINT "Еврейская пасха"; M - 31; "апреля(с. ст.)": D = M: GOTO 3 2 IF D + 13 > 31 THEN PRINT D + 13 - 31; "апреля (н.ст.)": END IF D + 13 < 32 THEN PRINT D + 13; "марта (н.ст.)": END 3 PRINT D - 31 + 13; "апреля(н.ст.)" INPUT "cont-1...9,no-0"; x IF x > 0 THEN 0
------------------- Еврейская пасха 1900: 1 апреля(с. ст.),14 апреля(н.ст.)
1901:еврейская пасха: 22 марта(с.ст.), 4 апреля (н.ст.)
1902:еврейская пасха: 9 апреля(с. ст.), 22 апреля(н.ст.)
1903:еврейская пасха: 30 марта(с.ст.), 12 апреля (н.ст.)
1904:еврейская пасха: 18 марта(с.ст.), 31 марта (н.ст.)
1905:еврейская пасха: 7 апреля(с. ст.), 20 апреля(н.ст.)
1906:еврейская пасха:28 марта (с.ст.),10 апреля (н.ст.)
1907:еврейская пасха: 17 марта(с.ст.), 30 марта (н.ст.)
1908:еврейская пасха: 3 апреля(с. ст.), 16 апреля(н.ст.)
1909:еврейская пасха: 24 марта(с.ст.), 6 апреля (н.ст.)
1910:еврейская пасха: 11 апреля(с. ст.), 24 апреля(н.ст.)
1911:еврейская пасха: 31 марта(с.ст.), 13 апреля (н.ст.)
1912:еврейская пасха:20 марта(с.ст.), 2 апреля (н.ст.)
1913:еврейская пасха: 9 апреля(с. ст.), 22 апреля(н.ст.)
1914:еврейская пасха: 29 марта(с.ст.), 11 апреля (н.ст.)
1915:еврейская пасха: 17 марта(с.ст.), 30 марта (н.ст.)
1916:еврейская пасха: 5 апреля(с. ст.), 18 апреля(н.ст.)
1917:еврейская пасха:25 марта(с.ст.), 7 апреля (н.ст.)
1918:еврейская пасха: 15 марта(с.ст.), 28 марта (н.ст.)
1919:еврейская пасха: 2 апреля(с. ст.), 15 апреля(н.ст.)
1920:еврейская пасха: 21 марта(с.ст.), 3 апреля (н.ст.)
1921:еврейская пасха: 10 апреля(с. ст.), 23 апреля(н.ст.)
1922:еврейская пасха:31 марта(с.ст.), 13 апреля (н.ст.)
1923:еврейская пасха:19 марта(с.ст.), 1 апреля (н.ст.)
1924:еврейская пасха: 6 апреля(с. ст.), 19 апреля(н.ст.)
1925:еврейская пасха: 27 марта(с.ст.),9 апреля (н.ст.)
1926:еврейская пасха: 17 марта(с.ст.),30 марта (н.ст.)
1927:еврейская пасха: 4 апреля(с. ст.), 17 апреля(н.ст.)
1928:еврейская пасха: 23 марта(с.ст.),5 апреля (н.ст.)
1929:еврейская пасха:12 апреля(с. ст.), 25 апреля(н.ст.)
1930:еврейская пасха: 31 марта(с.ст.), 13 апреля (н.ст.)
1931:еврейская пасха: 20 марта(с.ст.), 2 апреля (н.ст.)
1932:еврейская пасха: 8 апреля(с. ст.), 21 апреля(н.ст.)
1933:еврейская пасха:29 марта(с.ст.), 11 апреля (н.ст.)
1934:еврейская пасха: 18 марта(с.ст.),31 марта (н.ст.)
1935:еврейская пасха: 5 апреля(с. ст.), 18 апреля(н.ст.)
1936:еврейская пасха: 25 марта(с.ст.), 7 апреля (н.ст.)
1937: еврейская пасха: 14 марта(с.ст.), 27 марта (н.ст.)
1938:еврейская пасха: 3 апреля(с. ст.),16 апреля(н.ст.)
1939:еврейская пасха: 22 марта(с.ст.), 4 апреля (н.ст.)
1940:еврейская пасха: 10 апреля(с. ст.), 23 апреля(н.ст.)
1941:еврейская пасха: 30 марта(с.ст.), 12 апреля (н.ст.)
1942:еврейская пасха: 20 марта(с.ст.), 2 апреля (н.ст.)
1943:еврейская пасха: 7 апреля(с. ст.), 20 апреля(н.ст.)
1944:еврейская пасха: 26 марта(с.ст.), 8 апреля (н.ст.)
1945:еврейская пасха: 16 марта(с.ст.), 29 марта (н.ст.)
1946:еврейская пасха: 3 апреля(с. ст.), 16 апреля(н.ст.)
1947:еврейская пасха: 23 марта(с.ст.), 5 апреля (н.ст.)
1948:еврейская пасха: 11 апреля(с. ст.), 24 апреля(н.ст.)
1949:еврейская пасха: 1 апреля(с. ст.), 14 апреля(н.ст.)
1950:еврейская пасха: 20 марта(с.ст.), 2 апреля (н.ст.)
1951:еврейская пасха: 8 апреля(с. ст.), 21 апреля(н.ст.)
1952:еврейская пасха:28 марта(с.ст.), 10 апреля (н.ст.)
1953:еврейская пасха: 18 марта(с.ст.), 31 марта (н.ст.)
1954:еврейская пасха: 5 апреля(с. ст.), 18 апреля(н.ст.)
1955:еврейская пасха: 25 марта(с.ст.), 7 апреля (н.ст.)
1956:еврейская пасха: 14 марта(с.ст.), 27 марта (н.ст.)
1957:еврейская пасха: 3 апреля(с.ст), 16 апреля(н.ст.)
1958:еврейская пасха: 23 марта(с.ст.), 5 апреля (н.ст.)
1959:еврейская пасха: 10 апреля(с. ст.), 23 апреля(н.ст.)
1960:еврейская пасха:30 марта(с.ст.),12 апреля (н.ст.)
1961:еврейская пасха: 19 марта(с.ст.), 1 апреля (н.ст.)
1962:еврейская пасха: 6 апреля(с. ст.), 19 апреля(н.ст.)
1963:еврейская пасха: 27 марта(с.ст.), 9 апреля (н.ст.)
1964:еврейская пасха: 15 марта(с.ст.), 28 марта (н.ст.)
1965:еврейская пасха: 4 апреля(с. ст.), 17 апреля(н.ст.)
1966:еврейская пасха: 23 марта(с.ст.), 5 апреля (н.ст.)
1967:еврейская пасха: 12 апреля(с. ст.), 25 апреля(н.ст.)
1968:еврейская пасха: 31 марта(с.ст.), 13 апреля (н.ст.)
1969:еврейская пасха:21 марта(с.ст.), 3 апреля (н.ст.
1970:еврейская пасха: 8 апреля(с. ст.), 21 апреля(н.ст.)
1971:еврейская пасха: 28 марта(с.ст.), 10 апреля (н.ст.)
1972:еврейская пасха:17 марта(с.ст.), 30 марта (н.ст.)
1973:еврейская пасха: 4 апреля(с. ст.), 17 апреля(н.ст.)
1974:еврейская пасха: 25 марта(с.ст.), 7 апреля (н.ст.)
1975:еврейская пасха: 14 марта(с.ст.) 27 марта (н.ст.)
1976:еврейская пасха: 2 апреля(с. ст.), 15 апреля(н.ст.)
1977:еврейская пасха: 23 марта (с.ст.), 5 апреля (н.ст.)
1978:еврейская пасха:9 апреля(с. ст.), 22 апреля(н.ст.)
1979:еврейская пасха: 30 марта(с.ст.), 12 апреля (н.ст.)
1980:еврейская пасха: 19 марта(с.ст.), 1 апреля (н.ст.)
1981:еврейская пасха: 6 апреля(с. ст.), 19 апреля(н.ст.)
1982:еврейская пасха: 26 марта(с.ст.), 8 апреля (н.ст.)
1983:еврейская пасха:16 марта(с.ст.), 29 марта (н.ст.)
1984:еврейская пасха:4 апреля(с.ст), 17 апреля(н.ст.)
1985:еврейская пасха: 24 марта(с.ст.), 6 апреля (н.ст.)
1986:еврейская пасха: 11 апреля(с. ст.), 24 апреля(н.ст.)
1987:еврейская пасха: 1 апреля(с. ст.), 14 апреля(н.ст.)
1988:еврейская пасха: 20 марта(с.ст.), 2 апреля (н.ст.)
1989:еврейская пасха: 7 апреля(с. ст.), 20 апреля(н.ст.)
1990:еврейская пасха:28 марта(с.ст.), 10 апреля (н.ст.)
1991:еврейская пасха:17 марта(с.ст.), 30 марта (н.ст.)
1992:еврейская пасха: 5 апреля(с. ст.), 18 апреля(н.ст.)
1993:еврейская пасха: 24 марта(с.ст.),6 апреля (н.ст.)
1994:еврейская пасха: 14 марта(с.ст.), 27 марта (н.ст.)
1995: еврейская пасха: 2 апреля(с. ст.), 15 апреля(н.ст.)
1996:еврейская пасха: 22 марта(с.ст.), 4 апреля (н.ст.)
1997:еврейская пасха: 9 апреля(с. ст.), 22 апреля(н.ст.)
1998:еврейская пасха: 29 марта(с.ст.), 11 апреля (н.ст.)
1999:еврейская пасха: 19 марта(с.ст.), 1 апреля (н.ст.)
2000:еврейская пасха: 7 апреля(с. ст.), 20 апреля(н.ст.) 2001:еврейская пасха 26 марта ст.стиль, 8 апреля н.ст.
2002: еврейская пасха 15 марта ст.ст.,28 марта н.ст.
2003: еврейская пасха 4 апреля ст.ст., 17 апреля н.ст.
G= 2004:еврейская пасха 24 марта ст.ст., 6 апреля н.ст.
2005:еврейская пасха 11 апреля ст.ст., 24 апреля н.ст.
2006:еврейская пасха 31 марта ст.ст., 13 апреля н.ст.
2007: еврейская пасха 21 марта ст.ст., 3 апреля н.ст. 2008:еврейская пасха 7 апреля ст.ст., 20 апреля н.ст.
2009:еврейская пасха 27 марта ст.ст., 9 апреля н.ст.
2010: еврейская пасха 17 марта ст .ст., 30 марта н.ст.
2011: еврейская пасха 6 апреля ст.ст., 19 апреля н.ст.
2012: еврейская пасха 25 марта ст.ст., 7 апреля н.ст.
2013: еврейская пасха 13 марта ст. ст., 26 марта н.ст.
2014: еврейская пасха 2 апреля ст. ст., 15 апреля н.ст.
2015: еврейская пасха 22 марта ст.ст.. 4 апреля н.ст.
2016: еврейская пасха 10 апреля ст.ст.. 23 апреля н.ст.
2017: еврейская пасха 29 марта ст.ст., 11 апреля н.ст.
2018: еврейская пасха 18 марта ст.ст., 31 марта н.ст.
2019: еврейская пасха 7 апреля ст.ст., 20 апреля н.с
2020: еврейская пасха 27 марта ст.ст., 9 апреля н.ст.
G= 2021
15 марта(с.ст.)
28 марта (н.ст.)
G= 2022
3 апреля(с. ст.)
16 апреля(н.ст.)
G= 2023
24 марта(с.ст.)
6 апреля (н.ст.)
G= 2024
10 апреля(с. ст.)
23 апреля(н.ст.)
G= 2025
31 марта(с.ст.)
13 апреля (н.ст.)
G= 2026
20 марта(с.ст.)
2 апреля (н.ст.)
G= 2027
9 апреля(с. ст.)
22 апреля(н.ст.)
G= 2028
29 марта (с.ст.)
11 апреля (н.ст.)
G= 2029
18 марта(с.ст.)
31 марта (н.ст.)
G= 2030
5 апреля(с. ст.)
18 апреля(н.ст.)
G= 2031
26 марта(с.ст.)
8 апреля (н.ст.)
G= 2032
14 марта(с.ст.)
27 марта (н.ст.)
G= 2033
1 апреля(с. ст.)
14 апреля(н.ст.)
G= 2034
22 марта(с.ст.)
4 апреля (н.ст.)
G= 2035
11 апреля(с.ст)
24 апреля(н.ст.)
G= 2036
30 марта(с.ст.)
12 апреля (н.ст.)
G= 2037
18 марта(с.ст.)
31 марта (н.ст.)
G= 2038
7 апреля(с. ст.)
20 апреля(н.ст.)
G= 2039
27 марта(с.ст.)
9 апреля (н.ст.)
G= 2040
16 марта(с.ст.)
29 марта (н.ст.)
G= 2041
3 апреля(с. ст.)
16 апреля(н.ст.)
G= 2042
23 марта(с.ст.)
5 апреля (н.ст.)
G= 2043
12 апреля(с. ст.)
25 апреля(н.ст.)
G= 2044
30 марта(с.ст.)
12 апреля (н.ст.)
G= 2045
20 марта(с.ст.)
2 апреля (н.ст.)
G= 2046
8 апреля(с. ст.)
21 апреля(н.ст.)
G= 2047
29 марта(с.ст.)
11 апреля (н.ст.)
G= 2048
18 марта (с.ст.)
31 марта (н.ст.)
G= 2049
4 апреля(с. ст.)
17 апреля(н.ст.)
G= 2050
25 марта(с.ст.)
7 апреля (н.ст.)
G= 2051
15 марта(с.ст.)
28 марта (н.ст.)
G= 2052
1 апреля(с. ст.)
14 апреля(н.ст.)
G= 2053
21 марта(с.ст.)
3 апреля (н.ст.)
G= 2054
10 апреля(с. ст.)
23 апреля(н.ст.)
G= 2055
31 марта (с.ст.)
13 апреля (н.ст.)
G= 2056
19 марта(с.ст.)
1 апреля (н.ст.)
G= 2057
6 апреля(с. ст.)
19 апреля(н.ст.)
G= 2058
27 марта(с.ст.)
9 апреля (н.ст.)
G= 2059
16 марта(с.ст.)
29 марта (н.ст.)
G= 2060
2 апреля(с. ст.)
15 апреля(н.ст.)
G= 2061
23 марта(с.ст.)
5 апреля (н.ст.)
G= 2062
12 апреля(с. ст.)
25 апреля(н.ст.)
G= 2063
1 апреля(с. ст.)
14 апреля(н.ст.)
G= 2064
19 марта(с.ст.)
1 апреля (н.ст.)
G= 2065
8 апреля(с. ст.)
21 апреля(н.ст.)
G= 2066
28 марта(с.ст.)
10 апреля (н.ст.)
G= 2067
18 марта(с.ст.)
31 марта (н.ст.)
G= 2068
4 апреля(с. ст.)
17 апреля(н.ст.)
G= 2069
24 марта(с.ст.)
6 апреля (н.ст.)
G= 2070
14 марта(с.ст.)
27 марта (н.ст.)
G= 2071
1 апреля(с. ст.)
14 апреля(н.ст.)
G= 2072
21 марта(с.ст.)
3 апреля (н.ст.)
G= 2073
9 апреля(с. ст.)
22 апреля(н.ст.)
G= 2074
30 марта(с.ст.)
12 апреля (н.ст.)
G= 2075
18 марта(с.ст.)
31 марта (н.ст.)
G= 2076
5 апреля(с. ст.)
18 апреля(н.ст.)
G= 2077
26 марта(с.ст.)
8 апреля (н.ст.)
G= 2078
16 марта(с.ст.)
29 марта (н.ст.)
G= 2079
3 апреля(с. ст.)
16 апреля(н.ст.)
G= 2080
22 марта(с.ст.)
4 апреля (н.ст.)
G= 2081
11 апреля(с. ст.)
24 апреля(н.ст.)
G= 2082
1 апреля(с. ст.)
14 апреля(н.ст.)
G= 2083
21 марта(с.ст.)
3 апреля (н.ст.)
G= 2084
7 апреля(с. ст.)
20 апреля(н.ст.)
G= 2085
28 марта(с.ст.)
10 апреля (н.ст.)
G= 2086
17 марта(с.ст.)
30 марта (н.ст.)
G= 2087
4 апреля(с. ст.)
17 апреля(н.ст.)
G= 2088
24 марта(с.ст.)
6 апреля (н.ст.)
G= 2089
13 марта(с.ст.)
26 марта (н.ст.)
G= 2090
2 апреля(с. ст.)
15 апреля(н.ст.)
G= 2091
21 марта(с.ст.)
3 апреля (н.ст.)
G= 2092
9 апреля(с. ст.)
22 апреля(н.ст.)
G= 2093
29 марта(с.ст.)
11 апреля (н.ст.)
G= 2094
19 марта(с.ст.)
1 апреля (н.ст.)
G= 2095
6 апреля(с. ст.)
19 апреля(н.ст.)
G= 2096
25 марта(с.ст.)
7 апреля (н.ст.)
G= 2097
15 марта(с.ст.)
28 марта (н.ст.)
G= 2098
4 апреля(с. ст.)
17 апреля(н.ст.)
G= 2099
23 марта(с.ст.)
5 апреля (н.ст.)
|