泊松分佈(II)

程式編寫日期: 2007年9月24日

這個程式除了有泊松分佈(I)程式的功能外,還可以連續顯示每一項的概率(可以用作考試的中間步驟)及計算各項概率的總和。

注意: e^( 是按 shift ex

程式 (68 bytes)

ClrMemory: ?→A: ?→B: Lbl 0:

A^( B ) ÷ B! ÷  e^( A→C: CM+:  X=0 => ?→C:

C≧1 => C→X: 1+B→B: X≧B => Goto 0: C => X=0 => Goto 0: M

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

 

例題1: 若X ~ Po(5),求P(X=4)。

按 Prog 1 再按 5 EXE 4 EXE (顯示答案為0.17547)

程式執行完成後,請按AC中止程式。

 

例題2: 若X ~ Po(5),求P(4≦X≦6)。

按 Prog 1 再按 5 EXE 4 EXE 6 EXE (顯示P(4≦X≦6)為0.49716)

 

例題3: 若X ~ Po(5),求P(X=4),P(X=5),P(X=6)及P(4≦X≦6)。

按 Prog 1 再按 5 EXE 4 EXE (顯示P(X=4)為0.17547) EXE (顯示P(X=5)為0.17547)

EXE (顯示P(X=6)為0.14622) 0 EXE (0表示計算完結,顯示P(4≦X≦6)為0.49716)

 

返回 CASIO fx-50FH 及 fx-50F PLUS 程式集

Free Web Hosting