--$x;<>;$a-=($x*=.9)*2**($_/800)for<>;print-357*sqrt(2/++$x-1)+1154*log$a/$x/6.6