Глобальные переменные и процедуры Опции

[Дмитрий]

Извините за глупый вопрос, но просмотрев форум и FAQ я так и не нашел ответ Как нужно задавать переменные, чтобы в процессе выполнения процедуры изменялись переменные? Причем необходимо именно через процедуры, а не через функции(это специально оговоренно в задании).

[volvo]

Второй Var не забывай ... Перед каждой новой переменной нужно Var проставлять заново, иначе эта переменная будет считаться "переданной по значению", и ее изменение не передастся в вызывающий блок...

Код

procedure enter (var arra:arr; var n:integer);
var i:integer;
begin
  writeln('Введите длину массива'); readln(n);
  for i:=1 to n do begin
    readln(arra[i]);
  end;
end;