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

[Дмитрий]

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

[volvo]

klem4, заголовок посмотри

Дмитрий, если тебе нужно именно использование глобальных переменных, то при таком описании:

Код

Var x: integer;

Procedure Y;
Begin
  X := 100;
End;

как раз глобальные переменные и используются... Вариант klem4 показывает, как использовать Var-параметры, но они не обязательно должны быть глобальными. Вот, например, локальные Var-параметры:

Код

procedure B(var x: integer);
begin
  x := 100;
end;

Procedure A;
Var x: integer;
begin
  procedure B(x);
end;

klem4 :