正整數冪二項式定理(I)
更新日期: 2014年8月1日
注意: 紅色 nCr 是按 Shift ÷ 及計算機只會顯示粗體的C字。
程式一 (35 bytes)
ClrMemory: ?→A: ?→B: ?→C:
While 1: C nCr M × B^(M)A^(C-M◢ 1M+: WhileEnd
程式二由網友 tony200910041提供。
程式二 (36 bytes，使用記憶A、B、C及D)
?→A:?→B:?→C:
For 0→D To C: C nCr D × B^(D)A^(C-D◢ Next: 0
註1: 如果是使用fx-50FH，上述兩個程式中的乘號 ×可以省略不輸入，程式長度可節省1 byte。
註2: 程式一若果想保留一些記憶用作儲存臨時數據，可將程式中"ClrMemory"改為"MM-"，而程式所使用的記憶為A，B，C及M。
例題: 展開 (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-3650P II、fx-50FH II及fx-50F PLUS 程式集