Отсортировать двумерный массив - VB (61034)

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

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

В двумерном массиве из положительных и отрицательных чисел записать числа главной диагонали в обратную сторону.

Решение задачи: «Отсортировать двумерный массив»

textual
Листинг программы
Form1.Cls
Dim n%(10, 10), s%, r%
r = InputBox("razmer massiva")
For i = 1 To r
For j = 1 To r
 n(i, j) = Rnd(1) * 10 \ 1 - 5
 Print n(i, j);
Next j
Print
Next i
For i = 1 To r \ 2
 s = n(i, i): n(i, i) = n(r + 1 - i, r + 1 - i): n(r + 1 - i, r + 1 - i) = s
Next i
Print
For i = 1 To r
For j = 1 To r
 Print n(i, j);
Next j
Print
Next i

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


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

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

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