多邊形數
程式可以計算第n個多邊形數及首n個多邊形數的總和。
程式編寫日期: 2008年3月21日
程式 (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