Problem 5
n=1000001;   p=N[1/1900000];
p*(1-p)^(n-1)
[Graphics:../Images/prob_gr_15.gif]


Converted by Mathematica      February 10, 2001