Вычисление даты Пасхи (61/52)

| рубрика «Программы» | автор Русский
Метки: ,

Программа вычисляет дату православной Пасхи (с поправкой на новый стиль). Номер года вводится в РX, после вычислений в нём же будет номер месяца, а в РY — номер дня, на который придётся Пасха в указанном году.

00.П2   01.1     02.9    03.ПП    04.86   05.П3   06.ИП2 07.4   08.ПП  09.86
10.П4   11.ИП2   12.7    13.ПП    14.86   15.П5   16.1   17.9   18.ИП3 19.x
20.1    21.5     22.+    23.3     24.0    25.ПП   26.86  27.П6  28.2   29.ИП4
30.x    31.4     32.ИП5  33.x     34.+    35.6    36.ИП6 37.x   38.+   39.6
40.+    41.7     42.ПП   43.86    44.ИП6  45.+    46.П1  47.3   48.П4  49.ИП2
50.1    51.-     52.2    53.F10^x 54.:    55.K[x] 56.В^  57.В^  58.4   59.:
60.K[x] 61.-     62.2    63.0     64.+    65.ИП1  66.+   67.П3  68.3   69.1
70.-    71.Fx>=0 72.76   73.П3    74.KИП4 75.ИП3  76.3   77.0   78.-   79.Fx>=0
80.83   81.П3    82.KИП4 83.ИП3   84.ИП4  85.С/П  86.П0  87.<-> 88.П1  89.<->
90.:    91.K[x]  92.ИП0  93.x     94.ИП1  95.-    96./-/ 97.В/О

Далее можно, введя в память следующий код, вычислить даты Вознесения и Троицы:

00.П0 01.<-> 02.П1    03.<-> 04.-     05.1   06.3   07.+   08.П1 09.3
10.1  11.-   12.Fx>=0 13.19  14.П1    15.ИП0 16.1   17.+   18.П0 19.ИП0
20.1  21.+   22.П0    23.ИП1 24.ИП0   25.С/П 26.ИП1 27.1   28.0  29.+
30.П1 31.3   32.1     33.-   34.Fx>=0 35.41  36.П1  37.ИП0 38.1  39.+
40.П0 41.ИП1 42.ИП0   43.С/П