定積分計算 ( 梯形法則 ) ( 第一版 )
( Numerical Integration : Trapezoidal
Rule ( Version 1 ) )
( 程式版本：1.0，最後更新日期 14 AUG 2003。)
|
LBL 0
|
R/S
|
STO 0
|
R/S
|
STO 1
|
RCL 0
|
|
STO –1
|
R/S
|
STO 2
|
STO ÷1
|
1
|
STO 3
|
|
0
|
STO 4
|
LBL 1
|
XEQ F
|
STO +4
|
RCL 1
|
|
STO +0
|
XEQ F
|
STO +4
|
1
|
STO +3
|
RCL 3
|
|
INPUT
|
RCL 2
|
x ≦ y?
|
GTO 1
|
C
|
RCL 1
|
|
STO ×4
|
2
|
STO ÷4
|
RCL 4
|
GTO E
|
LBL F
|
|
RAD
|
RCL
0
|
COS
|
÷
|
RCL
0
|
ex
|
|
=
|
RTN
|
LBL E
|
PRGM
|
最少 37
steps
|
|
| 例：利用梯形法則 ( Trapezoidal Rule )，用 10 個區間 ( subintervals ) 計算積分 |
 |
先按 XEQ 0
再按 0 R/S ( 積分下限 (
Lower Limit ) )
再按 1 R/S ( 積分上限 (
Upper Limit ) )
再按 10 R/S ( 區間數目 (
Number of subintervals )，注意此數必須是正整數。)
顯示 0.555807 ( 使用梯形法則計算的積分近似值 )
| 亦即是說 |  |
注意：如想計算其他積分，只需修改褐色部份。( R0 是函數變數 )
程式執行完成後，按 RCL 4 會顯示計算的積分近似值。