Форум АНТИЧАТ - Вопросы по синтаксису Delphi

Вопросы по синтаксису Delphi

07.01.2007, 01:08

mR_LiNK[deface_0nl

Участник форума

Регистрация: 12.12.2006

Сообщений: 158

Провел на форуме:
1364740

Репутация: 114

Вопросы по синтаксису Delphi

Вопрос в следующем::
Как задется открытый массив??
Пример(расчет средней элементов массива):

Код:

...
function Average(a: array of integer): real;
var
  i: Integer;
begin
  for i := 0 to 5 do readln(a[i]);
  Result := 0;
  for I := Low(a) to High(a) do Result := Result + a[i];
  Result := Result / (High(a) - Low(a) + 1);
end;
begin
  writeln(Average(a));

  writeln('Press Enter to exit...');
  readln;
end.
...

Компилятор выдает следующее:
Undeclared identifier:'a'
Что вобщем-то понятно, т.к. переменная 'а' описана только в локальном блоке, т.е. в функции, а не в программе.

Объясните как ее описать в программе, или что нужно исправить, чтобы избаиться от ошибки?