END{for(;n<99;)printf"n="++n+1", p=%.8f\n",v+=(1-v)*n/365}