Нет индексного свойства по умолчанию для типа integer - PascalABC.NET (25340)

Формулировка задачи:

В общем дошел до процедур и функций и решил попрактиковаться в них, написав простую программу,которая формирует двухмерный массив и выводит его на экран. Блок ввода решил описать в функциях, а блок вывода в процедуре, но выдаёт ошибку в 27 строке в виде: "Нет индексного свойства по умолчанию для типа integer" что это значит? Как исправить?

program masssssss;
 
uses
  crt;
 
const
  n = 5;m = 5;
 
type
  tip = array[1..n, 1..m] of integer;
 
function massiv: tip;
var
  i, j: integer;
begin
  for i := 1 to n do
    for j := 1 to m do
      massiv[i, j] := random(9);
end;
 
procedure ask(var massivik: integer);
var
  i, j: integer;
begin
  for i := 1 to n do
    for j := 1 to m do
      writeln(massivik[i, j]);
end;
 
begin
  
  ask(massiv);
end.

Решение задачи: «Нет индексного свойства по умолчанию для типа integer»

Листинг программы

const
  n = 5; m = 5;
 
type
  tip = array[1..n, 1..m] of integer;
 
function massiv: tip;
var
  i, j: integer;
begin
  for i := 1 to n do
    for j := 1 to m do
      result[i, j] := random(9);
end;
 
procedure ask(const massivik: tip); // раз
var
  i, j: integer;
begin
  for i := 1 to n do
  begin
    for j := 1 to m do
      write(massivik[i, j]:3);
    writeln;
  end;
end;
 
begin
  ask(massiv); // два
end.

Объяснение кода листинга программы

Создается константа n со значением 5.
Создается константа m со значением 5.
Создается тип tip, который является массивом размером n на m для хранения целых чисел.
Создается функция massiv, которая инициализирует массив tip случайными значениями от 0 до 8.
Создается процедура ask, которая принимает массив tip в качестве параметра.
В процедуре ask происходит два вложенных цикла, которые перебирают все элементы массива и выводят их значения на экран.
Вызывается процедура ask с массивом massiv в качестве аргумента.
Код завершается.