Anonymous user
Integer comparison: Difference between revisions
→{{header|Modula-3}}
Line 382:
MODULE Main;
FROM IO IMPORT Put, GetInt;
FROM Fmt IMPORT Int
VAR a,b: INTEGER;
BEGIN
a :=
b :=
IF a < b THEN
Put(Int(a) & " is less than " & Int(b) & "\n");
| |||