Question

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

Answer 1

Все параметры-переменные имеют описатели var.
В P это y, в Q - y, в R их нет.
Итого их 2.
Ответ: 2