RosettaCodeData/Task/A+B/Modula-3/a+b.mod3

17 lines
241 B
Plaintext

MODULE Ab EXPORTS Main;
IMPORT IO;
VAR
A,B:INTEGER;
BEGIN
TRY
A := IO.GetInt();
B := IO.GetInt();
EXCEPT
| IO.Error => IO.Put("Invalid number!\n");
END;
IO.PutInt(A+B);
IO.Put("\n");
END Ab.