15 lines
354 B
Text
15 lines
354 B
Text
MODULE Arith EXPORTS Main;
|
|
|
|
IMPORT IO, Fmt;
|
|
|
|
VAR a, b: INTEGER;
|
|
|
|
BEGIN
|
|
a := IO.GetInt();
|
|
b := IO.GetInt();
|
|
IO.Put("a+b = " & Fmt.Int(a + b) & "\n");
|
|
IO.Put("a-b = " & Fmt.Int(a - b) & "\n");
|
|
IO.Put("a*b = " & Fmt.Int(a * b) & "\n");
|
|
IO.Put("a DIV b = " & Fmt.Int(a DIV b) & "\n");
|
|
IO.Put("a MOD b = " & Fmt.Int(a MOD b) & "\n");
|
|
END Arith.
|