Разработать ИТ, позволяющую пересчитать элементы матрицы - VB

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

Разработать информационную технологию, позволяющую пересчитать элементы матрицы, расположенные на главной диагонали и на диагонали, противоположной главной, увеличив их значение в 10 раз. Помогите пожалуйста

Решение задачи: «Разработать ИТ, позволяющую пересчитать элементы матрицы»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Sub Task(A() As integer)
      n=Ubound(A,1)
      for i%=1 to n%
          for j%=n% to 1 step -1
              A(i%,j%)=10*A(i%,j%)
          Next j%
      next i%
End Sub

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

12 голосов , оценка 3.917 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы