RosettaCodeData/Task/Temperature-conversion/Mathematica/temperature-conversion.math

6 lines
127 B
Plaintext

tempConvert[t_] :=
Grid[Transpose@{{"K", "C", "F", "R"},
Round[{t, t - 273.15, 9 t/5 - 459.67, 9 t/5}, .01]}]
tempConvert[21]