укажите результат выполнения программы var a,b: integer
procedure proc(var a: integer; b: integer)
begin b:=4; a:=6; b:=a+b; end;
begin a:=2; b:=3; proc(a,b); writeln(a,' ',b); end.