Mode:
Duration:
1
2
3
4
5
6
7
8
9
10
MODULE Stopwatch;
IMPORT InOut;
VAR time: INTEGER := 0;
BEGIN
WHILE time < 5 DO
InOut.WriteString("Stopwatch: "); InOut.WriteInt(time,0); InOut.WriteLn;
time := time + 1;
END;
InOut.WriteString("Done!"); InOut.WriteLn;
END Stopwatch.Coding works best on desktop or with an external keyboard.