7 lines
111 B
Plaintext
7 lines
111 B
Plaintext
MODULE Second;
|
|
CONST a,b : INTEGER;
|
|
VAR x,y,z : INTEGER;
|
|
BEGIN x := a + b, y := a - b, z := a * b
|
|
END Second.
|
|
|