18 lines
614 B
Plaintext
18 lines
614 B
Plaintext
MODULE ints;
|
|
|
|
IMPORT InOut;
|
|
|
|
VAR a, b : INTEGER;
|
|
|
|
BEGIN
|
|
InOut.WriteString ("Enter two integer numbers : "); InOut.WriteBf;
|
|
InOut.ReadInt (a);
|
|
InOut.ReadInt (b);
|
|
InOut.WriteString ("a + b = "); InOut.WriteInt (a + b, 9); InOut.WriteLn;
|
|
InOut.WriteString ("a - b = "); InOut.WriteInt (a - b, 9); InOut.WriteLn;
|
|
InOut.WriteString ("a * b = "); InOut.WriteInt (a * b, 9); InOut.WriteLn;
|
|
InOut.WriteString ("a / b = "); InOut.WriteInt (a DIV b, 9); InOut.WriteLn;
|
|
InOut.WriteString ("a MOD b = "); InOut.WriteInt (a MOD b, 9); InOut.WriteLn;
|
|
InOut.WriteLn;
|
|
END ints.
|