正整數冪二項式定理(I)
更新日期: 2011年9月8日
注意: 紅色 nCr 是按 Shift ÷ 及計算機只會顯示粗體的C字。
程式一 (34 bytes)
ClrMemory: ?→A: ?→B: ?→C:
While 1: C nCr MB^(M)A^(C-M◢ 1M+: WhileEnd
註1: 若果想保留一些記憶用作儲存臨時數據，可將程式中"ClrMemory"改為"MM-"，而程式所使用的記憶為A，B，C及M。
程式二由網友 tony200910041提供。
程式二 (35 bytes，使用記憶A、B、C及D)
?→A:?→B:?→C:
For 0→D To C: C nCr DB^(D)A^(C-D◢ Next: 0
例題: 展開 (3x - 2y)4
按 Prog 1 再按 3 EXE - 2 EXE 4 EXE (顯示第一個係數為81) EXE (顯示第二個係數為-216)
EXE (顯示第三個係數為216) EXE (顯示第四個係數為-96) EXE (顯示第五個係數為16)
EXE (出現Error(程式一)或0(程式二)，表示計算已完結)
因此，(3x - 2y)4 = 81x4 - 216x3y + 216x2y2 - 96xy3 + 16y4
返回 CASIO fx-50FH 及 fx-50F PLUS 程式集