$x=<>;$s+=($x+$_)**-2for 1..1e6;print$s+1e-6