# TITLE:  Poisson Distribution          
# AUTHOR: Andrew Rapp, arapp@vt.edu
# EMAIL:  rfamgm at gmail
# WEB:    http://www.spiderpixel.co.uk/caspro                  
# DATE:   17Oct1996
# MAKE:   CASIO
# MODEL:  fx6300 or greater   
# SIZE:   90                                      
#
#         Calculates poisson distribution at a value of x 
#         and cummulatively for probability<=x.

@@ Program 1

Mcl
"N"?->N:"P"?->P:"X"?->X
X+1->X
X->A
Lbl 1
X-A->C
e^(-n*p)*(n*p)^c/c!->D
D+B->B
Dsz A:Goto 1
"P(X=x)":D_
"P(X<=x)":B_