Матрицы. Возможные ошибки

var 
  a: Matrix;
  sums: array [1..SzM] of integer;
 
begin
  var m := 4;
  var n := 5;
  FillMatrixByRandom(a,m,n);
 
  writeln('Исходная матрица: ');
  PrintMatrix(a,m,n);
 
  var sum := 0;
  for var i:=1 to m do
    sum += a[1,i];     // здесь перепутаны строка и столбец: переменная i является 
                       // номером столбца и меняеся от 1 до m, что неправильно
end.