pascalabcnet/Grammars/Oberon00/Progrs/second.obr

7 lines
111 B
Plaintext
Raw Permalink Normal View History

2015-05-14 22:35:07 +03:00
MODULE Second;
CONST a,b : INTEGER;
VAR x,y,z : INTEGER;
BEGIN x := a + b, y := a - b, z := a * b
END Second.