Подсчет суммы элементов столбцов матрицы - VB

Узнай цену своей работы

Формулировка задачи:

Добрый день, господа! Делаю лабораторку и впал в ступор немного.. Нужно сложить все элементы каждого столбца двумерного массива (NхN) и вывести на экран. Как сложить элементы одного любого столбца я понимаю, а вот как сложить элементы каждого столбца поочередно? Извиняюсь за глупый вопрос конечно Заранее спасибо!

Решение задачи: «Подсчет суммы элементов столбцов матрицы»

textual
Листинг программы
Option Base 1
Private Sub Form_Load()
Dim A() As Single, N As Integer
Dim Sum As Single, txt
txt = ""
Sum = 0
N = InputBox("N")
ReDim A(N, N)
For i = 1 To N
For j = 1 To N
A(j, i) = 100 * Rnd - 50
Sum = Sum + A(j, i)
Next j
txt = txt & Sum & "  "
Sum = 0
Next i
MsgBox txt
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 3.75 из 5
Похожие ответы