Сумма всех элементов первой строки матрицы - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д