泊松分佈(I)

程式編寫日期: 2005年12月8日

注意: e是按shift ex

程式 (41 bytes)

Mem Clear: ?→A: ?→B: ?→C: Lbl 0:

A^B ÷ B! eA M+: 1+B→B: C≧B => Goto 0: M

註: 程式若果想保留一些記憶用作儲存臨時數據,可將程式中"Mem clear"改為"MM-: 0→C:",而程式所使用的記憶為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)

 

返回 fx-3650P及SC-185 程式集

Free Web Hosting