Сумма всех элементов первой строки матрицы - VB

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

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

Здравствуйте ещё раз. Можете ещё мне помочь. Дана квадратная матрица A(n,n) Найти сумму всех элементов первой строки и последнего столбца.

Решение задачи: «Сумма всех элементов первой строки матрицы»

textual
Листинг программы
Private Sub Command1_Click()
Dim a() As Integer
n = 4
ReDim a(n, n)
Randomize
s = 0
For i = 1 To n
Print
   For j = 1 To n
   a(i, j) = Int(Rnd * 10)
      If i = 1 Or j = n Then s = s + a(i, j)
      Print a(i, j);
   Next
Next
MsgBox s
End Sub

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


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

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

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