Select Code to Download

0        1         2         3         4
12345678901234567890123456789012345678901234
$b=pop;$b=($b+$ARGV[0]/$b)/2for 0..9;print$b