#   I N T E R P R E T A T O R   I N   D E M A G O G 
 
 #   R U S S I A N   O R T O D O X   E A S T E R   D A T E 
 
 #   P R E S S   F 2 
 
 
 
 #   !" &/  "  ""         D E M A G O G 
 
 #    !'"  "+   !  !%
 
 #   /  +/  "  F 2 
 
 
 
 N U M   g o d ,   d e l t a ,   a ,   b ,   c ,   d ,   e ,   p 
 
 S T R   m o n t h 
 
 
 
 g o d   =   I n p u t B o x ( ' 0B0  ?@02>A;02=>9  0AE8' , ' 2548B5  3>4' , ' 2 0 1 5 ' ) 
 
 
 
 I F   g o d   <   1 9 1 8   |   g o d   >   2 2 9 9     
 
         S h o w M e s s a g e ( '  0AG5B  >3@0=8G5=  ?5@8>4><  1 9 1 8 . . 2 2 9 9   33. ' ) 
 
         E X I T 
 
 F I 
 
 
 
 #   !59G0A  >BAB020=85  N;80=A:>3>  :0;5=40@O  >B  3@53>@80=A:>3>  -   1 3   4=59
 
 #   >A;5  2 9 . 0 2 . 2 1 0 0   -   1 4   4=59
 
 #   >A;5  2 9 . 0 2 . 2 2 0 0   -   1 5   4=59
 
 
 
 d e l t a   =   1 3 
 
 m o n t h   =   ' <0@B' 
 
 I F   g o d   >   2 0 9 9 
 
         d e l t a   =   1 4 
 
 F I 
 
 I F   g o d   >   2 1 9 9 
 
         d e l t a   =   1 5 
 
 F I 
 
 
 
 #   ;3>@8B<  0CAA0
 
 a   =   g o d   %   1 9 
 
 b   =   g o d   %   4 
 
 c   =   g o d   %   7 
 
 d   =   ( 1 9 * a + 1 5 )   %   3 0 
 
 e   =   ( 2 * b + 4 * c + 6 * d + 6 )   %   7 
 
 p   =   2 2 + d + e + d e l t a 
 
 I F   p   >   3 1 
 
         p   =   p - 3 1 
 
         m o n t h   =   ' 0?@5;L' 
 
 F I 
 
 I F   p   >   3 0 
 
         p   =   p - 3 0 
 
         m o n t h   =   ' <09' 
 
 F I 
 
 #   B25B  3>B>2  : ) 
 
 p u t   @02>A;02=0O  0AE0
 
 p u t   g o d , '   ' , m o n t h , '   ' , p 
 
 
 
 #     MB>  -   40==K5  4;O  ?@>25@:8: 
 
 #   2 0 0 5   -   1   <0O
 
 #   2 0 0 6   -   2 3   0?@5;O
 
 #   2 0 0 7   -   8   0?@5;O
 
 #   2 0 0 8   -   2 7   0?@5;O
 
 #   2 0 0 9   -   1 9   0?@5;O
 
 #   2 0 1 0   -   4   0?@5;O
 
 #   2 0 1 1   -   2 4   0?@5;O
 
 #   2 0 1 2   -   1 5   0?@5;O
 
 #   2 0 1 3   -   5   <0O
 
 #   2 0 1 4   -   2 0   0?@5;O
 
 #   2 0 1 5   -   1 2   0?@5;O
 
 #   2 0 1 6   -   1   <0O
 
 #   2 0 1 7   -   1 6   0?@5;O
 
 #   2 0 1 8   -   8   0?@5;O
 
 