Question

Program 3;
Var a,b:integer;
Procedure P (x:integer; Var y:integer);
Var z:integer;
Begin
Z:=x; x:=y; y:=z; End.
Begin
A:=3; b:=4;
P(a,b); writeln(a, ` ` , b); P(a,b) ; writeln(a, ` ` , b); end.
Ce va afișa programul ?

Answer 1

Răspuns:4 3

Explicație: Înlocuirea numerelor