透鏡公式/球面鏡公式
程式編寫日期: 2006年5月15日
程式可計算以下兩種情況的問題:
(1) 已知透鏡或球面鐿的焦距、物距及物高，求像距及像高
(2) 已知透鐿或球面鏡的焦距、像距及像高，求物距及物高
注意: 程式中的公式採用實為正 (real is positive) 的規定: 即如果物、像或焦點是實的，物距、像距及焦距等為正值；如它們是虛的，取負值。
程式 (24 bytes，使用記記憶為A、B及C)
?→A: ?→B: ?→C: AB ÷ (B - A◢ Ans C ÷ B
例題: 一凸透鏡的焦距為20 cm，物體放在離它25 cm處，物高為1 cm，求像距及像高。
按 Prog 1 再按 20 EXE 25 EXE 1 EXE (顯示像距為 100 cm) 再按 EXE (顯示像高為 4 cm)