Невозможно задать выходным параметром двумерный массив
Компилятор выдает ошибку - после 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;