9 lines
191 B
Text
9 lines
191 B
Text
do
|
|
print "Kelvin degrees (>=0): ";
|
|
input K
|
|
until K>=0
|
|
|
|
print "K = " + string(K)
|
|
print "C = " + string(K - 273.15)
|
|
print "F = " + string(K * 1.8 - 459.67)
|
|
print "R = " + string(K * 1.8)
|