分半法 ( Bisection Method )

注意:此程式只能在 HP-32SII 上使用。

LBL A
INPUT A
STO B
XEQ F
STO D
R/S
INPUT B
XEQ F
STO C
STO ×D
R/S
RCL D
x 0?
GTO A
RCL C
x 0?
GTO B
GTO C
LBL B
RCL A
x <> B
STO A
LBL C
RCL A
RCL +B
2
÷
R/S
x <> B
STO C
XEQ F
R/S
x 0?
GTO D
GTO C
LBL D
RCL C
x <> B
STO A
GTO C
LBL F
RCL B
3
yx
RCL B
x2
3
×
+
RCL B
2
×
1
PRGM
最少 63 bytes

( 程式連同數字記憶共使用最少 87 bytes。)
( 如果日後想繼續輸入其他程式,則請在離開 PRGM 模式前按 RTN。)

例:用分半法 ( Bisection Method ) 計算方程式 f(x) = x3 + 3x2 – 2x – 1 = 0 位於 01 之間的根。

XEQ A,此時計算機應顯示 A?

 0 R/S     顯示  –1    ( f(0) = -1 < 0 )
再按  R/S,再按  1 R/S      顯示  1    ( f(1) = 1 > 0 )
所以在 0 1 之間確實有至少一個根存在。

再按  R/S      顯示  0.5  ( 第一個近似值 First approximation )
再按  R/S      顯示  –1.125   ( f(0.5) 的數值 )
再按  R/S      顯示  0.75   ( 第二個近似值 Second approximation )
再按  R/S      顯示  –0.390625  ( f(0.75) 的數值 )
…………………………

直至要求的準確度達到為止

注意:如想解其他方程式,只需修改褐色部份。( B 是函數變數 ) 要輸入其他方程式,按 PRGM 進入程式輸入狀態後,再按 ▲,再連續按 直至出現 F01 - LBL F,便可開始輸入其他方程式。

試位法 ( False Position Method, or Regula Falsi )

正割法 ( Secant Method )

迭代法 ( Iteration Method )

返回選擇程式頁

返回頁首

Hosted by www.Geocities.ws

1