Размещено 4 года назад по предмету
Информатика
от kereto2014
задан двухмерный массив надо Найти сумму максимальных элементов столбцов матрицы Х(n, n).
вот написал но не так как надо делает помогите Private Sub CommandButton4_Click() ReDim w(m, n) For j = 1 To n Max = 0 For i = 1 To mIf Max < a(i, j) Then Max = a(i, j) Next i MaxNext j TextBox2.Text = TextBox2.Text + Str(s) + " " End Sub