include std/console.e

atom K
while 1 do
    K = prompt_number("Enter temperature in Kelvin >=0: ",{0,4294967296})
    printf(1,"K = %5.2f\nC = %5.2f\nF = %5.2f\nR = %5.2f\n\n",{K,K-273.15,K*1.8-459.67,K*1.8})
end while