數列的總和或乘積 ( Sum or Product of a Sequence )

( 程式版本：1.0，最後更新日期 14 AUG 2003。)

這個程式可以計算一個數列 ( Sequence ) 的總和 ( Sum ) ( 或乘積 ( Product )，但須修改程式 )。請看以下例子。

例：計算

LBL 0	R/S	STO 0	R/S	STO 1	0
STO 2	LBL 1	RCL 0	+	1	=
x2	STO +2	1	STO +0	RCL 0	INPUT
RCL 1	x ≦ y?	GTO 1	RCL 2	PRGM	最少 18 steps

先按  XEQ 0
再按  2 R/S  ( 開始計算的數列項 ( Term ) )
再按  7 R/S   ( 計算的最後一項 )

顯示    199

亦即是說

要計算其他數列總和，只需修改褐色部分。( R0 是函數變數 )

---

如果要計算乘積，除了修改褐色部分外，亦需將上面程式中的 0 改為 1 及 STO +2 改為 STO ×2，修改後如下：

LBL 0	R/S	STO 0	R/S	STO 1	1
STO 2	LBL 1	RCL 0	+	1	=
x2	STO ×2	1	STO +0	RCL 0	INPUT
RCL 1	x ≦ y?	GTO 1	RCL 2	PRGM	最少 18 steps

例：計算

先按  XEQ 0
再按  2 R/S  ( 開始計算的數列項 ( Term ) )
再按  7 R/S   ( 計算的最後一項 )

顯示    406425600

亦即是說