正割法及試位法
程式最新版
新版程式編寫日期: 2006年10月3日
程式 (最少71 bytes)
Mem clear: ?→M: Lbl 0: ?→X: X3 - 2X - 1→C◢
0≧MC => C→Y => X→A: MC>0 => C→D => X→B:
(AD - BY) ÷ (D - Y→X: M=0 => Y→D => A→B: Goto 0
註1: 綠色的X3 - 2X - 1是函數方程(變數是X)，若果想計算其它 方程，只要修改綠色的部份。
註2: 若果不想顯示函數值，可將程式中藍色的◢ 修改為 : 。
註3: 程式中的"Mem clear:"其實可以不輸入，不過若這做，在輸入第一個數值後，有可能會被原先數字記憶影響(機會率很低)，而出現Math ERROR，如果 萬一出現上述情況，需要自行清除所有數字記憶 (按 Shift Mode 1 EXE)，再執行程式。
註4: 計數機顯示近似值會有?，當沒有?並顯示Disp表示為對應的函數值。
註5: 若果函數值為零，表示對應的x值已是計數機能計算出的最準確的答案，可按 AC 終止程式，若再繼續執行程式，有可能出現Math ERROR。
例題1: 用正割法解 x3 – 2x – 1 = 0, 1 < x < 2。
按 Prog 1 再按 EXE (輸入0或直接按EXE，表示使用正割法程式)
1 EXE (顯示 f(1)的值為 - 2) EXE (沒有?無法輸入數值，再按一下EXE)
2 EXE (顯示 f(2)的值為 3)
EXE (顯示第1近似值1.4)
EXE (顯示f(1.4)的值為-1.056)
EXE (顯示第2近似值1.556213)
EXE (顯示f(1.556213)的值為-0.343591)
EXE (顯示第3近似值1.631554)
EXE (顯示f(1.631554)的值為 0.0800355)
…………
若將程式中藍色的◢ 修改為 : ，那麼不顯示函數值，而按法如下:
按 Prog 1 再按 EXE (輸入0或直接按EXE，表示使用正割法程式)
1 EXE 2 EXE (顯示第1近似值1.4)
EXE (顯示第2近似值1.556213)
EXE (顯示第3近似值1.631554)
…………
例題2: 用試位法解 x3 – 2x – 1 = 0, 1 < x < 2。
按 Prog 1 再按 1 EXE (輸入1表示使用試位法程式)
1 EXE (顯示 f(1)的值為 - 2) EXE (沒有?無法輸入數值，再按一下EXE)
2 EXE (顯示 f(2)的值為 3)
EXE (顯示第1近似值為1.4)
EXE (顯示f(1.4)的值為-1.056)
EXE (顯示第2近似值為1.556213)
EXE (顯示f(1.556213)的值為-0.343591)
EXE (顯示第3近似值為1.601817)
EXE (顯示f(1.601817)的值為-0.0936633)
EXE (顯示第4近似值為1.613872)
EXE (顯示f(1.613872)的值為-0.0242785)
EXE (顯示第5近似值為1.616972)
EXE (顯示f(1.616972)的值為-0.0062106)
…………………
若將程式中藍色的◢ 修改為 : ，那麼不顯示函數值，而按法如下:
按 Prog 1 再按 1 EXE (輸入1表示使用試位法程式)
1 EXE 2 EXE (顯示第1近似值為1.4)
EXE (顯示第2近似值為1.556213)
EXE (顯示第3近似值為1.601817)
EXE (顯示第4近似值為1.613872)
EXE (顯示第5近似值為1.616972)
…………………