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 ?
Vă mulțumim că ați ales să vizitați platforma noastră dedicată Informatică. Sperăm că resursele disponibile v-au fost de ajutor. Pentru întrebări sau asistență suplimentară, nu ezitați să ne contactați. Ne bucurăm să vă revedem în curând și vă invităm să ne salvați în lista de site-uri preferate!
