復活節日期

程式可以計算不同年份復活節的日期。

程式編寫日期: 2007年1月7日

程式(106步)

1 Kin 1 2. Kin 2 3. ÷ 4. 1 5. 9
6. - 7. . 8. 5 9. = 10. Fix 0
11. RND 12. × 13. 1 14. 9 15. =
16. Kin - 2 17. 1 18. 9 19. Kin × 2 20. 2
21. 4 22. Kin + 2 23. Kout 2 24. ÷ 25. 3
26. 0 27. - 28. . 29. 5 30. =
31. RND 32. × 33. 3 34. 0 35. =
36. Kin - 2 37. Kout 2 38. ÷ 39. 2 40. 8
41. - 42. . 43. 5 44. = 45. RND
46. Kin - 2 47. Kout 1 48. ÷ 49. 4 50. -
51. . 52. 5 53. = 54. RND 55. Kin + 1
56. Kout 2 57. Kin + 1 58. 1 59. 3 60 Kin - 1
61. Kout 1 62. ÷ 63. 7 64. - 65. .
66. 5 67. = 68. RND 69. × 70. 7
71. = 72. Kin - 1 73. Kout 1 74. Kin - 2 75. Kout 2
76. + 77 4 78. 0 79. = 80. ÷
81. 4 82. 4 83. + 84. 2 85. .
86. 5 87. = 88. RND 89. HLT 90. ÷
91. 4 92. - 93. . 94. 5 95. =
96. RND 97. Norm 98. × 99. 3 100. 1
101. = 102. Kin - 2 103. 2 104. 8 105. Kin + 2
106. Kout 2 107.   108.   109.   110.  

LRN 模式輸入程式(供 fx-3600PV及fx-3800P使用,程式長度: 106步 )

Kin 1 Kin 2 ÷ 1 9
- . 5 = Fix 0
RND × 1 9 =
Kin - 2 1 9 Kin × 2 2
4 Kin + 2 Kout 2 ÷ 3
0 - . 5 =
RND × 3 0 =
Kin - 2 Kout 2 ÷ 2 8
- . 5 = RND
Kin - 2 Kout 1 ÷ 4 -
. 5 = RND Kin + 1
Kout 2 Kin + 1 1 3 Kin - 1
Kout 1 ÷ 7 - .
5 = RND × 7
= Kin - 1 Kout 1 Kin - 2 Kout 2
+ 4 0 = ÷
4 4 + 2 .
5 = RND HLT ÷
4 - . 5 =
RND Norm × 3 1
= Kin - 2 2 8 Kin + 2
Kout 2 MODE .      

 

例題: 計算2008年復活節的日期。

按 2008 P1 (顯示3) RUN (顯示23)

所以2008年復活節日期為年3月23日

 

註: 這個程式只可以計算1900-2099年的復活節日期。

 

返回 fx-3900PV程式集

Free Web Hosting