procedure main()
every|(i:=0)\100+:=(1to.58+read()/30.17)^2|write(i)
end