泊松分佈(I)

程式是參考網友王者再臨編寫二項分佈程式,修改原有舊程式。

更新日期: 2014年8月31日

注意: e^(是按shift ex

程式 (40 bytes)

ClrMemory: ?→A: ?→B: B→C: ?→C:

For B→B To C: A^(B) ÷ ( B!e^(A M+: Next: M

註1: 程式若果想保留一些記憶用作儲存臨時數據,可將程式中"ClrMemory"改為"MM-",而程式所使用的記憶為A,B,C及M。

註2: 如果是使用fx-3650P II或fx-50FH II,上述程式中紫色的開括號 ( 可以省略,程式長度可減1 byte。

 

例題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-3650P II、fx-50FH II及fx-50F PLUS 程式集