Casio50 » fx-3x50P » Programs 程式集 » Numerical Root-Finding 數值法求根 »
本式可以二分法求一方程的根
| <COMP> |
|---|
| Goto 3 : Lbl 0 : f(X) → C : X = A => Goto 4 : Goto 2 : |
| Lbl 3 : ? → A : ? → B : |
| Lbl 1 : . 5 ( A + B → D ◢ D → X : Goto 0 : |
| Lbl 2 : C → Y : A → X: Goto 0 : |
| Lbl 4 : 0 > C Y => D → B : C Y > 0 => D → A : Goto 1 |
| >86 Bytes |
| 一般操作 | 例子 | |||||||
|---|---|---|---|---|---|---|---|---|
求 並以 [a,b] 為初始區間 |
求 (in
radian mode)並以 [0.5, 1] 為初始區間
可寫成 )
|
|||||||
| 啟動程式 | 按 Prog 1 | |||||||
| 輸入初始值 a EXE b EXE |
1 EXE 0.5 EXE | |||||||
| 顯示近似值 x1 EXE x2 EXE x3 EXE ... |
0.75 EXE 0.875 EXE 0.8125 EXE 0.78125 EXE 0.796875 EXE 0.8046875 EXE 0.80078125 EXE 0.802734375 EXE 0.801757812 EXE 0.801269531 EXE 0.80102539 EXE 0.80114746 EXE 0.801086425 EXE 0.801055908 EXE ... (正確答案 = 0.801070765425) |
| A | an-1 |
|---|---|
| B | bn-1 |
| C | fn-1 |
| D | xn |
| X | xn-1 |
| Y | f(an-1) |
| M |
區間 [a,b] 是指變數 x 是在 a 和 b 之間.