RosettaCodeData/Task/A+B/Oberon/a+b.oberon
2023-07-01 13:44:08 -04:00

12 lines
132 B
Text

MODULE ab;
IMPORT In, Out;
VAR A, B : INTEGER;
BEGIN
In.Int (A);
In.Int (B);
Out.Int (A + B, 8);
Out.Ln
END ab.