Temperature conversion: Difference between revisions
m
reorder correctly
(→{{header|Mathematica}}: use built-in function) |
m (reorder correctly) |
||
Line 643:
130 PRINT K*1.8-459.67;TAB(10);"Degrees Fahrenheit"
140 PRINT K*1.8;TAB(10);"Degrees Rankine"</lang>
==={{header|Sinclair ZX81 BASIC}}===▼
<lang basic>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"</lang>▼
==={{Header|Tiny BASIC}}===
Line 654 ⟶ 662:
PRINT F," Fahrenheit"
PRINT R," Rankine"</lang>
▲==={{header|Sinclair ZX81 BASIC}}===
▲<lang basic>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"</lang>
=={{header|BASIC256}}==
| |||