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ă informațiile disponibile v-au fost utile. Dacă aveți întrebări suplimentare sau aveți nevoie de sprijin, nu ezitați să ne contactați. Vă așteptăm cu drag și data viitoare! Nu uitați să adăugați site-ul nostru la favorite pentru acces rapid.
