Двумерный массив, Ошибка в параметрах процедуры Опции

[-=АнЮтА=-]

Процедура работает с файлом чисел.
Невозможно задать выходным параметром двумерный массив
Компилятор выдает ошибку - после array требует of, не дает указать размерность. В чем причина? Помогите пожалуйста.

Procedure FileRead(s: string; var si:array[1..2,1..5] of integer);
    var f: file of integer;
        begin
         assign(f,s);
         reset(f);
         for i:=1 to 2 do
         begin
         for j:=1 to 5 do
         begin
         read(f,a[i,j]);
         writeln(a[i,j]);
         end;
         end;
         close(f);
        end;

[volvo]

В Турбо Паскале (и не только) к моменту написания заголовка все типы уже должны быть известны, это не Extended Pascal, где допускается подобное объявление... Так что:

Type
  matrix = array[1..2, 1..5] of integer;
Procedure FileRead(s: string; var si:matrix);
...

[-=АнЮтА=-]

Спасибо) Сейчас попробую

Добавлено через 4 мин.
Получилось *YAHOO*