定積分計算 ( 梯形法則及森遜法則 )
( Numerical Integration : Trapezoidal
Rule and Simpson's Rule )
( 程式版本：1.0，最後更新日期 14 AUG 2003。)
|
LBL 0
|
R/S
|
STO 1
|
R/S
|
STO 2
|
RCL 1
|
|
STO –2
|
R/S
|
STO 3
|
STO ÷2
|
－
|
1
|
|
=
|
n!
|
XEQ 1
|
STO 4
|
R/S
|
STO 5
|
|
4
|
STO ×5
|
2
|
STO ÷3
|
STO ×2
|
RCL 3
|
|
n!
|
XEQ 1
|
STO –5
|
C
|
3
|
STO ÷5
|
|
RCL 5
|
GTO E
|
LBL 1
|
RCL 1
|
STO 0
|
0
|
|
STO 6
|
1
|
STO 7
|
LBL 2
|
XEQ F
|
STO +6
|
|
RCL 2
|
STO +0
|
XEQ F
|
STO +6
|
1
|
STO +7
|
|
RCL 7
|
INPUT
|
RCL 3
|
x ≦
y?
|
GTO 2
|
RCL 2
|
|
STO ×6
|
2
|
STO ÷6
|
RCL 6
|
RTN
|
LBL F
|
|
RAD
|
RCL
0
|
COS
|
÷
|
RCL
0
|
ex
|
|
=
|
RTN
|
LBL E
|
PRGM
|
最少
63 steps
|
|
| 例：利用梯形法則 ( Trapezoidal Rule ) 及森遜法則 ( Simpson's Rule )，用 10 個區間 ( subintervals ) 計算積分 |
 |
先按 XEQ 0
再按 0 R/S ( 積分下限 (
Lower Limit ) )
再按 1 R/S ( 積分上限 (
Upper Limit ) )
再按 10 R/S ( 區間數量 (
Number of subintervals )，注意此數必須是正整數，否則程式會顯示錯誤 Error-Func。)
顯示 0.555807 ( 使用梯形法則計算的積分近似值 )
再按 R/S 顯示 0.555396
( 使用森遜法則計算的積分近似值 )
( 如果輸入的區間數量 ( Number of subintervals
) 不是雙數，則此時會顯示錯誤 Error-Func。)
| 亦即是說使用梯形法則 |  |
| 而使用森遜法則 |  |
注意：如想計算其他積分，只需修改褐色部份。( R0 是函數變數 )
程式執行完成後，按 RCL 7 會顯示使用梯形法則計算的積分近似值，而按 RCL 8 會顯示使用森遜法則計算的積分近似值。