Найти вектор С, координаты которого равны максимуму элементов соответствующих строк матрицы А- QBasic(Бейсик)

DECLARE FUNCTION Max (MTR(), Stroka, Stolbcov)
 
  '   Ввод кол-ва строк и столбцов
  CLS
   PRINT "vvedite kolvo strok massiva"
   INPUT "n=", N
   PRINT "vvedite kolvo stolbcov massiva"
   INPUT "m=", M
 
  '   Заводим массив
DIM A(M, N)   ' (Столбец, строка)
DIM C(M)
 
   '   Ввод элементов матрицы
   PRINT "Vvedite elementi matrici"
   FOR iy = 1 TO N
     FOR ix = 1 TO M
     PRINT "A("; STR$(ix); ","; STR$(iy); ")=";
     INPUT "", A(ix, iy)
     NEXT ix
   NEXT iy: CLS : PRINT "A:"
 
   '   Вывод матрицы
   FOR iy = 1 TO N
     FOR ix = 1 TO M
     PRINT A(ix, iy);
     NEXT ix: PRINT
   NEXT iy: PRINT
 PRINT "C=(";
 
 '   Нахождение вектора
   FOR i = 1 TO N
      C(i) = Max(A(), i, M)
   NEXT i
 
 '   Вывод вектора
 FOR i = 1 TO N
   PRINT C(i);
   IF N <> i THEN PRINT ",";
 NEXT i: PRINT ")"
 
FUNCTION Max (MTR(), Stroka, Stolbcov)
MaxV = MTR(1, Stroka)
   FOR k = 1 TO Stolbcov
     IF MTR(k, Stroka) > MaxV THEN MaxV = MTR(k, Stroka)
   NEXT
Max = MaxV
END FUNCTION