兩日期間日數
程式計算兩日期間的日數(包括最後一日，但不包括第一日）。
程式編寫日期: 2007年1月6日
程式(70步)
| 1 | X←→Y | 2. | sin-1 | 3. | cos | 4. | Kin 3 | 5. | ENT |
| 6. | Kin 4 | 7. | ENT | 8. | Kin 5 | 9. | ENT | 10. | Kin 6 |
| 11. | 1 | 12. | Kin + 5 | 13. | 3 | 14. | . | 15. | 5 |
| 16. | - | 17. | Kout 5 | 18. | = | 19. | ÷ | 20. | x2 |
| 21. | √ | 22. | + | 23. | 1 | 24. | = | 25. | ÷ |
| 26. | 2 | 27. | × | 28. | Kin - 4 | 29. | 1 | 30. | 2 |
| 31. | = | 32. | Kin + 5 | 33. | 3 | 34. | 6 | 35. | 5 |
| 36. | . | 37. | 2 | 38. | 5 | 39. | × | 40. | Kout 4 |
| 41. | - | 42. | . | 43. | 5 | 44. | = | 45. | Fix 0 |
| 46. | RND | 47. | + | 48. | 3 | 49. | 0 | 50. | . |
| 51. | 6 | 52. | × | 53. | Kout 5 | 54. | - | 55. | . |
| 56. | 5 | 57. | + | 58. | Kout 6 | 59. | = | 60 | RND |
| 61. | Norm | 62. | X←→K1 | 63. | Kin 2 | 64. | 1 | 65. | X←→Y |
| 66. | Kout 3 | 67. | x > 0 | 68. | Kout 2 | 69. | Kin - 1 | 70. | Kout 1 |
LRN 模式輸入程式(只供 fx-3800P使用，程式長度: 70步 )
| X←→Y | sin-1 | cos | Kin 3 | ENT 1 |
| Kin 4 | ENT 2 | Kin 5 | ENT 3 | Kin 6 |
| 1 | Kin + 5 | 3 | . | 5 |
| - | Kout 5 | = | ÷ | x2 |
| √ | + | 1 | = | ÷ |
| 2 | × | Kin - 4 | 1 | 2 |
| = | Kin + 5 | 3 | 6 | 5 |
| . | 2 | 5 | × | Kout 4 |
| - | . | 5 | = | Fix 0 |
| RND | + | 3 | 0 | . |
| 6 | × | Kout 5 | - | . |
| 5 | + | Kout 6 | = | RND |
| Norm | X←→K1 | Kin 2 | 1 | X←→Y |
| Kout 3 | x > 0 | Kout 2 | Kin - 1 | Kout 1 |
| MODE . |
例題: 計算2003年10月15日至2004年4月1日相差的日數。
按 P1 2003 RUN 10 RUN 15 RUN 2004 RUN 4 RUN 1 RUN (顯示相差日數為169)
註: 輸入的數值必須為整數。