Передача двумерного массива в модуль - PascalABC.NET

uses graphABC, createArray;
const nmax=10;
type 
  mass= array [1..nmax,1..nmax] of integer; //создание типа Массив для использования в процедурах
  
{========Объявление переменных========}
var i,j:integer; 
array1:mass;
 
Begin
i:=5; j:=5; //Размер двумерного массива по умолчанию
//В полном коде заморочено с изменением этих параметров.Оставим так, ни на что не влияет.
 
writeln ('Создание рандомного массива ',i,'х',j);
randomArray(i,j,array1);
printArray(i,j,array1);
writeln;
 
end.

Unit createArray;
interface 
const nmax=10;
type 
  mass= array [1..nmax,1..nmax] of integer; //создание типа Массив для использования в процедурах
 
procedure randomArray (i,j:integer; var vozvr:mass);
procedure printArray (i,j:integer; var vozvr:mass);
 
implementation
 
{========================}
procedure randomArray; //Процедура рандомного заполнения массива
var count, count2:byte;
begin
randomize;
for count:=1 to i do Begin 
for count2:=1 to j do
vozvr[count,count2]:=random(10); //для своего же удобства от 0 до 9
end;
end;
{========================}
 
procedure printArray; //Процедура вывода массива на экран
var count, count2:byte;
Begin
for count:=1 to i do begin
for count2:=1 to j do begin
write (vozvr[count,count2],' ');
end;
writeln; //перенос строки для визуального удобства
end;
end;
{========================}
 
begin
 
end.

mass= array of integer;