Mode:
Duration:
1
2
3
4
5
6
7
8
9
10
11
12
13
MODULE TempConv;
IMPORT IO;
PROCEDURE cToF(c: REAL): REAL;
BEGIN RETURN c*9/5+32 END cToF;
PROCEDURE fToC(f: REAL): REAL;
BEGIN RETURN (f-32)*5/9 END fToC;
BEGIN
IO.Put("25°C = "); IO.PutReal(cToF(25),2); IO.PutLn();
IO.Put("77°F = "); IO.PutReal(fToC(77),2); IO.PutLn();
END TempConv.Coding works best on desktop or with an external keyboard.