試位法
程式新版 (舊版依然保留在網頁下方)
新版程式編寫日期: 2006年1月3日
程式 (最少 53 bytes)
Mem clear: Lbl 0: ?→X: X3 - 2X - 1→C◢
C>0 => C→Y => X→A: 0>C => C→D => X→B:
(AD - BY) ÷ (D - Y→X: Goto 0
註: 綠色的X3 - 2X - 1是函數方程(變數是X),若果想計算其它 方程,只要修改綠色的部份。
程式另一個更精簡版本 (47 bytes)
例題: 用試位法解 x3 – 2x – 1 = 0, 1 < x < 2。
按 Prog 1 再按 1 EXE (顯示 f(1)的值為 - 2) 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)
…………………
舊版程式
程式編寫日期: 2005年12月18日
程式 (最少 70 bytes)
Mem clear: ?→A: ?→B: A→X: Lbl 0: X3 - 2X - 1→Y◢
CY≧0→M => X→A: M => Y→C: M=0 => X→B:
M=0 => Y→D: (AD - BC) ÷ (D - C→X◢ Goto 0
註: 綠色的X3 - 2X - 1是函數方程(變數是X),若果想計算其它 方程,只要修改綠色的部份。
例題: 用試位法解 x3 – 2x – 1 = 0, 1 < x < 2。
按 Prog 1 再按 1 EXE 2 EXE (輸入a及b的值,顯示 f(a)的值為 - 2)
EXE (顯示b的值為 2)
EXE (顯示 f(b)的值為 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)
…………………