Объявить двухмерный массив и напечатать матрицу на экране - QBasic
Формулировка задачи:
Имеется задача: Объявить двухмерный массив и напечатать матрицу на экране. При этом, если в верхней или нижней строке содержится максимальный элемент, то необходимо поменять строки (верхнюю и нижнюю) местами. Просьба помочь с последним пунктом
Листинг программы
- CLS
- DIM A (3,3)
- FOR I= 1 TO 3 STEP 1
- FOR J=1 TO 3 STEP 1
- INPUT A (i, j)
- NEXT J
- NEXT I
- FOR I= 1 TO 3 STEP 1
- FOR J= 1 TO 3 STEP 1
- PRINT A (i, j)
- NEXT J
- PRINT " "
- NEXT I
- LET B=A (1,1)
- LET KI=1
- LET KJ=1
- FOR I= 1 TO 3 STEP 1
- FOR J= 1 TO 3 STEP 1
- IF A (i, j) > B THEN
- LET B= A (i, j)
- LET KI= I
- LET KJ= J
- ELSE
- END IF
- NEXT J
- NEXT I
- PRINT B, KI, KJ
Решение задачи: «Объявить двухмерный массив и напечатать матрицу на экране»
textual
Листинг программы
- FOR j = 1 TO 3
- SWAP A(1, j), A(3, j)
- NEXT j
Объяснение кода листинга программы
- Объявляется переменная
j
типацелое число
со значением 1. - Выполняется цикл
FOR
от 1 до 3. - Внутри цикла выполняется команда
SWAP
для обмена элементов массиваA
с индексами (1, j) и (3, j). - После выполнения цикла, значение переменной
j
увеличивается на 1. - Цикл выполняется до тех пор, пока значение переменной
j
не станет равным 4. - Результатом выполнения команды
SWAP
является обмен элементов массиваA
с индексами (1, 1), (1, 2) и (1, 3). - Значение переменной
j
увеличивается на 1 после каждой итерации цикла. - В результате выполнения кода на экран будет выведена матрица массива
A
.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д