Temperature conversion: Difference between revisions
→{{header|Mathematica}}: use built-in function
(add tinybasic) |
(→{{header|Mathematica}}: use built-in function) |
||
Line 1,990:
=={{header|Mathematica}}==
<lang Mathematica>tempConvert[t_] := # -> Thread@UnitConvert[#,
{"DegreesFahrenheit", "DegreesCelsius", "DegreesRankine"}
] &@Quantity[N@t, "Kelvins"]
tempConvert[21]</lang>
{{out}}<pre>21.K -> {-421.87°F,-252.15°C,37.8°R}</pre>
=={{header|min}}==
|