多邊形數

程式編寫日期: 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-3650P II、fx-50FH II及fx-50F PLUS 程式集

Free Web Hosting