Условие:
Вычислить суммы элементов каждой строки матрицы 
, определить наименьшее значение среди этих сумм и номер соответствующей строки.
Решение:
Программный код.
Sub Zadanie_13_3()Dim i As Integer, j As Integer, n As Integer, m As IntegerDim S As Integer, S_min As Integer, i_min As IntegerRange("j10:o100").ClearContentsn = 5: m = 4ReDim a(n, m)For i = 1 To nS = 0For...