Укажите результат выполнения программы 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.