$x=<>;
for$n(1..1e5-$x){$s+=1/($x+$n)**2}
print$s+1e-5