泊松分佈(I)
程式是參考網友王者再臨編寫二項分佈程式，修改原有舊程式。
程式編寫日期: 2008年2月25日
注意: e^(是按shift ex
程式 (40 bytes)
ClrMemory: ?→A: ?→B: B→C: ?→C:
For B→B To C: A^(B) ÷ B! ÷ e^(A M+: Next: M
註: 程式若果想保留一些記憶用作儲存臨時數據，可將程式中"ClrMemory"改為"MM-"，而程式所使用的記憶為A，B，C及M。
例題1: 若X ~ Po(5)，求P(X=4)。
按 Prog 1 再按 5 EXE 4 EXE EXE (不輸入最後的數值代表只計算一項，顯示答案為0.17547)
例題2: 若X ~ Po(5)，求P(4≦X≦6)。
按 Prog 1 再按 5 EXE 4 EXE 6 EXE (顯示P(4≦X≦6)為0.49716)
返回 CASIO fx-50FH 及 fx-50F PLUS 程式集