((Log[0.0000001])/(Log[0.7]))

prob[n_]:=1-(1/((n-1)!))NIntegrate[(x^(n-1))(E^(-x)),{x,0,2}]

Table[{n,prob[n]},{n,1,20}] //TableForm