多邊形數

程式編寫日期: 2008年3月21日

程式可以計算第n個多邊形數及首n個多邊形數的總和。

程式 (47 bytes，使用記憶A及B)

?→A: ?→B: 2^-1B(AB - 2B - A + 4◢

4^-1B(B + 1)(4 - A + 3^-1(2B + 1)(A - 2

例題: 求三角形數第10項及首10項總和。

按 Prog 1 再按 3 EXE (邊數) 10 EXE (顯示第10項為55)

EXE (顯示首10項和為220)

參考資料:

http://staff.ccss.edu.hk/jckleung/xue_qu/polygon/polygon.html

http://mathworld.wolfram.com/PolygonalNumber.html

http://en.wikipedia.org/wiki/Polygonal_number

返回 CASIO fx-50FH 及 fx-50F PLUS 程式集