常態分佈概率

程式編寫日期: 2008年3月27日

程式 (181 bytes)

ClrMemory: ?→A: ?→B: ?→C: 1: While Ans: X→D: B→X:

AY=0 => ?→X: C^-1(X-B→X:1 ÷ (1 + . 2316419Abs( X:

. 5 - E -9 √( e^( - X² ) )(127414795Ans - 142248368Ans²

+ 710706870Ans³ - 726576013Ans^{2 2} + 530702714Ans^( 5:

Ans cos( π^r(DX>0M+: Y=0→Y: WhileEnd:

. 5A + M cos( π^rA→M: AD>0 => 1M-: Abs(M◢ 1 - Ans

例題1: 若X~ N(2, 3²). 求 P(2 ≤ X ≤ 6) 及 P(X≦2 或 X≧6).

按 Prog 1  再按 0 EXE (0表示計算 P(a≦X≦b) 及 P(X≦a 或 X≧b))

2 EXE 3 EXE 2 EXE 6 EXE (顯示P(2 ≤ X ≤ 6)為0.40878872)

EXE (顯示P(X≦2 或 X≧6)為 0.591211279)

例題2: 若X ~ N(2, 3²). 求 P(X ≧ 6) 及 P(X≦6).

按 Prog 1  再按 1 EXE (1表示計算 P(X≦a) 及 P(X≧a))

2 EXE 3 EXE 6 EXE (顯示P(X≦6)為 0.90878872)

EXE (顯示P(X ≧ 6)為0.091211279)

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