{* Задача107 *}

REM basic

' Пусть дана действительная матрица размером N x M. Требуется преобразить матрицу: поэлементно вычесть последнюю строку из всех строк, кроме последней.


 CLS
 INPUT "Vvedite kol-vo strok    : ", N
 INPUT "Vvedite kol-vo stolbcov : ", M
 Dim A(M, N)
 
  
   For iy = 1 To N
      For ix = 1 To M
        A(ix, iy) = RND * 89 + 10
        PRINT Using "##.##  "; A(ix, iy);
      Next: PRINT
   Next: PRINT
 
   For iy = 1 To N - 1
      For ix = 1 To M
         A(ix, iy) = A(ix, iy) - A(ix, N)
      Next
   Next
 
   For iy = 1 To N
      For ix = 1 To M
        PRINT Using "###.##  "; A(ix, iy);
      Next: PRINT
   Next
End