Вопрос в следующем::
Как задется открытый массив??
Пример(расчет средней элементов массива):
Код:
...
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'
Что вобщем-то понятно, т.к. переменная 'а' описана только в локальном блоке, т.е. в функции, а не в программе.
Объясните как ее описать в программе, или что нужно исправить, чтобы избаиться от ошибки?