s=r=scan("stdin")-100 for(i in r)s=r/.39083+s^2/6767+(s-100)*s^3/9344e5*!r>0 write(sprintf("%.3f",s+273.15),1)
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page