printf"n=$_, p=%.8f
",$a+=(1-$a)*--$_/365for 2..100