Матрица, не могу разобраться с главной дагональю - VB

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

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

Вычислить среднее геометрическое элементов матрицы R, размер CxC, расположенной на главной диагонали

Решение задачи: «Матрица, не могу разобраться с главной дагональю»

textual
Листинг программы
R = 1
 
For i = 1 To C
   If A(i, i) > 0 Then
      R = R * A(i, i)
   Else
      Print "Среднее геометрическое не определено"
      Goto 1000
   End If
Next 
 
R = R ^ (1/C)
Print R
1000

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


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

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

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