RosettaCodeData/Task/Temperature-conversion/BASIC/temperature-conversion-3.basic
2019-09-12 10:33:56 -07:00

6 lines
192 B
Text

10 PRINT "ENTER A TEMPERATURE IN KELVINS"
20 INPUT K
30 PRINT K;" KELVINS ="
40 PRINT K-273.15;" DEGREES CELSIUS"
50 PRINT K*1.8-459.67;" DEGREES FAHRENHEIT"
60 PRINT K*1.8;" DEGREES RANKINE"