Пожалуйста,нужна ваша помощь. VBA excel
Определить столбец матрицы В, сумма модулей элементов которого максимальна, если B=3A^2-A-7E , где E - единичная матрица, A - матрица размерности 5x5 , элементы которой определяется по формуле
Aij= i - j,если i=j
i - 2*j если i неравно j
Вывести на печать указанный столбец и его номер.
оформление на подобие этого!
Sub pr()
Dim A(1 To 5, 1 To 5) As Single
Dim B(1 To 5, 1 To 5) As Single
Dim C(1 To 5, 1 To 5) As Single
Dim d(1 To 5) As Single
Dim i As Integer, j As Integer, k As Integer
For i = 1 To 5 Step 1
For j = 1 To 5 Step 1
If i = j Then A(i, j) = 5 - i - j Else A(i, j) = i - j
Next