二項分佈(I)
程式編寫日期: 2005年11月14日
注意: 紅色的 × 是乘號,nCr 是按 shift ÷
第一個程式 (54 bytes)
Mem Clear: ?→A: ?→B: ?→C: ?→D:
Lbl 0: A nCr C × B^C (1-B)^(A-C M+:
1+C→C: D≧C => Goto 0: M
第二個程式 (59 bytes,使用記憶為A, B, C, D及M)
M M-: 0→D: ?→A: ?→B: ?→C: ?→D:
Lbl 0: A nCr C × B^C (1-B)^(A-C M+:
1+C→C: D≧C => Goto 0: M
例題1: 若X ~ Bin(9,0.5),求P(X=4)。
按 Prog 1 再按 9 EXE 0.5 EXE 4 EXE EXE (不輸入最後的數值代表只計算一項,顯示答案為0.24609)
例題2: 若X ~ Bin(9,0.5),求P(4≦X≦6)。按 Prog 1 再按 9 EXE 0.5 EXE 4 EXE 6 EXE (顯示答案為0.65625)