$n=<>*100; $y=$n*.99; $x=(1e6-$n)*.01; $r=1-$y/($x+$y); print $r*100;