---------------------------------------------------------------------------

Binomial Probability: Use to calculate B(K,N,P). Inputs trials, prob of
success, and success, then outputs probability.

PGRM:BINOMIAL
ClrHome
Disp "BINOMIAL PROB"
Disp "TRIALS="
Input N
Disp "PROB="
Input P
N -> X
Disp "SUCCESSES="
Input K
1 -> C
1 -> I
Lbl 1
C(X/I) ->C
If K=0
1 -> C
X-1 -> X
I+1 -> I
If  I <= K
Goto1
C(P^K)(1-P)^(N-K) -> R
Disp R