Экранға қандай нәтиже беріледі? Var a,b:integer; procedure P(x:integer; var y:integer); Begin x:=x+1; y:=y+1 end; Begin a:=40; b:=40; P(a,b); write(a,b) end.

1 40 40;

2 40 41;

3 41 41;

4 41 40;

5 40 0.