Ребята помогите в решении задачи на VBA ив редактировании кода.
Что в нем надо добавить, чтобы он заработал.
Сама задача
24. Построить вектор В, каждый элемент которого равен сумме строк матрицы G(m,m), деленной на элемент главной диагонали этой же строки.
Код:
Sub Массив()
Dim g(), b(), n As Integer, m As Integer, i As Integer, j As Integer
m = Val(InputBox("Введите m"))
ReDim g(1 To m, 1 To m), b(1 To m)
Randomize
Cells(1, 1) = "G(i,j)"
Cells(2 + i, 1) = "B(i)"
For i = 1 To m
For j = 1 To m
Sum = Sum + g(i, j)
Next
b(i) = Sum / g(i, i)
Sum = 0
Next
End Sub
За ранние благодарен