Программа

SUB MultiplyMatrix (A(), B(), C())  ' Процедура умножения матриц
  FOR i% = 1 TO UBOUND(A, 1)  ' Цикл просмотра строк матрицы
    FOR j% = 1 TO UBOUND(B, 2)  ' Цикл прсмотра элементов матрицы
      C(i%, j%) = 0   ' Обнуление элемента
      FOR k% = 1 TO UBOUND(A, 2)
                           ' Цикл формирования элементов матрицы произведения
        C(i%, j%) = C(i%, j%) + A(i%, k%) * B(k%, j%)
      NEXT k%
    NEXT j%
  NEXT i%
END SUB