Mon calcul convient-il ? Il ne reste plus qu'à appliquer avec A en équivalence -infini.
Code
//sigma=S, mu=U, X<Z
// par défaut, la ti82stat prendrait S=1 et U=0
// T tolérance
// remplacez U-10S par un autre U-kS pour affiner ou non, plus k est grand et plus c'est lourd ; cela permet de se passer de valeurs faibles et inutiles telle que -9E99
Prompt U,S,Z,T
"e^(-(X-U)^2/(2S^2))/(Srac(2pi->Y1 // "normalpdf(X,U,S->Y1 // normalFdp
Disp fnInt(Y1,X,U-10S,Z,T // Disp normalcdf(U-10S,Z,U,S // normalFRép