試位法

更新日期: 2011年2月14日

程式 (53 bytes,不包括綠色的函數方程))

ClrMemory: While 1: ?→X: X3 - 2X - 1→C◢

If C>0: Then C→Y: X→A: Else C→D: X→B: IfEnd:

(AD - BY) ÷ (D - Y→X: WhileEnd

 

註: 綠色的X3 - 2X - 1是函數方程(變數是X),若果想計算其它 方程,只要修改綠色的部份。

程式另一個更精簡版本 (48 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)

…………………

 

 

返回 CASIO fx-50FH、fx-3650P II、fx-50FH II及fx-50F PLUS 程式集

Free Web Hosting