5 lines
223 B
Text
5 lines
223 B
Text
100 INPUT PROMPT "Kelvin degrees: ":K
|
|
110 PRINT K;TAB(10);"Kelvin is equivalent to"
|
|
120 PRINT K-273.15;TAB(10);"Degrees Celsius"
|
|
130 PRINT K*1.8-459.67;TAB(10);"Degrees Fahrenheit"
|
|
140 PRINT K*1.8;TAB(10);"Degrees Rankine"
|