procedure q(x: integer; var y: integer); begin y: =x+1 end;
procedure r(var x, y: integer); begin y: =x+1 end;
для каждой из процедур определите, какие из ее параметров являются параметрами-значениями. в ответ введите суммарное количество параметров-значений для этих трех процедур. пример ввода ответа: 3