a=1
for i=1to 99a=a-a*i/365
?"n=",i+1,", p=",1-a using("%.8f")next