В чем ошибка? Фунция умножения матриц паскаль

Question

function umnomat(a,b:mas):mas; 
 var i,j,k:integer; 
 begin 
 for i:=1 to razm do begin 
 for j:=1 to razm do begin 
 for k:=0 to razm do begin 
 um[i,j]:=um[i,j]+A[i,k]*B[k,j]; 
 umnomat:=um; 
 end; 
 end; 
 end; 
 end;

Андрей · Accepted Answer

С чего это в третьем цикле индексы перебираются с нуля? И перед суммированием надо инициализировать элемент выходного массива нулем. И совершенно ни к селу, ни к городу umnomat:=um; 
Кроме того, в стандартном Паскале функция вообще не может возвращать массив.