二項分佈(I)
程式是由網友王者再臨提供。
網友提供程式日期: 2008年2月24日
注意: nCr 是按 shift ÷
第一個程式 (50 bytes)
ClrMemory: ?→A: ?→B: ?→C: C→D: ?→D:
For C→C To D: A nCr C B^(C) (1-B)^(A-C M+:
Next: M
第二個程式 (51 bytes，使用記憶為A, B, C, D及M)
MM-: ?→A: ?→B: ?→C: C→D: ?→D:
For C→C To D: A nCr C B^(C) (1-B)^(A-C M+:
Next: 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)