二項分佈(II)
程式編寫日期: 2005年11月15日
這個程式除了有二項分佈(I)程式的功能外，還可以連續顯示每一項的概率(可以用作考試的中間步驟)及計算各項概率的總和。
注意: 紅色的 × 是乘號，nCr 是按 shift ÷
程式 (79 bytes)
Mem Clear: ?→A: ?→B: ?→C: Lbl 0: A nCr C × B^C (1-B)^(A-C→D:
AnsM+: 1+C→C: X=0 => ?→D: D≧1 => D→X: X≧C => Goto 0:
D => X=0 => Goto 0: M
註: 程式若果想保留一些記憶用作儲存臨時數據，可將程式中"Mem clear"改為"X→0: MM-"，而程式所使用的記憶為A，B，C，D，X及M。
例題1: 若X ~ Bin(9,0.5)，求P(X=4)。
按 Prog 1 再按 9 EXE 0.5 EXE 4 EXE (顯示答案為0.24609)
程式執行完成後，請按AC中止程式。
例題2: 若X ~ Bin(9,0.5)，求P(4≦X≦6)。
按 Prog 1 再按 9 EXE 0.5 EXE 4 EXE 6 EXE (顯示答案為0.65625)
例題3: 若X ~ Bin(9,0.5)，求P(X=4)，P(X=5)，P(X=6)及P(4≦X≦6)。
按 Prog 1 再按 9 EXE 0.5 EXE 4 EXE (顯示P(X=4)為0.24609) EXE (顯示P(X=5)為0.24609)
EXE (顯示P(X=6)為0.16406) 0 EXE (0表示計算完結，顯示P(4≦X≦6)為0.65625)