透鏡公式/球面鏡公式
程式編寫日期: 2006年12月16日
程式可計算以下兩種情況的問題:
(1) 已知透鏡或球面鐿的焦距、物距及物高，求像距及像高
(2) 已知透鐿或球面鏡的焦距、像距及像高，求物距及物高
注意: 程式中的公式採用實為正 (real is positive) 的規定: 即如果物、像或焦點是實的，物距、像距及焦距等為正值；如它們是虛的，取負值。
程式(17步)
| 1 | ENT | 2. | Kin 3 | 3. | Kin 4 | 4. | ENT | 5. | Kin 1 |
| 6. | Kin - 4 | 7. | Kout 4 | 8. | +/- | 9. | Kin ÷ 3 | 10. | ENT |
| 11. | Kin 2 | 12. | Kout 3 | 13. | Kin × 1 | 14. | Kin × 2 | 15. | Kout 1 |
| 16. | HLT | 17. | Kout 2 | 18. | 19. | 20. |
LRN 模式輸入程式(供 fx-3600PV及fx-3800P使用，程式長度: 17步 )
| ENT 2 | Kin 3 | Kin 4 | ENT 3 | Kin 1 |
| Kin - 4 | Kout 4 | +/- | Kin ÷ 3 | ENT 4 |
| Kin 2 | Kout 3 | Kin × 1 | Kin × 2 | Kout 1 |
| HLT | Kout 2 | MODE . |
例題: 一凸透鏡的焦距為20 cm，物體放在離它25 cm處，物高為1 cm，求像距及像高。
按 P1 20 RUN 25 RUN 1 RUN (顯示像距為 100 cm) 再按 RUN (顯示像高為 4 cm)