Как в массиве поменять местами первую и последнюю строки? - QBasic

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

В массиве поменять местами первую и последнюю строки.

Решение задачи: «Как в массиве поменять местами первую и последнюю строки?»

Листинг программы

CLS : RANDOMIZE TIMER
DIM A(5, 5)
FOR i = 1 TO 5
 FOR j = 1 TO 5
  A(i, j) = INT(RND * 10): PRINT A(i, j); 'генерация и вывод элементов массива
 NEXT
 PRINT
NEXT
 
FOR j = 1 TO 5
 SWAP A(1, j), A(5, j) 'смена строк
NEXT
PRINT
 
FOR i = 1 TO 5
 FOR j = 1 TO 5
  PRINT A(i, j); 'вывод результата
 NEXT
 PRINT
NEXT
END

Объяснение кода листинга программы

Объявляется массив A размером 5x5.
Заполняются ячейки массива значениями от 0 до 9 с помощью функции RND.
Выводятся значения массива на экран.
Меняются местами первая и последняя строки массива.
Выводятся значения массива на экран.

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

10 голосов , оценка 3.9 из 5

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

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

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