Разработать программу обработки двумерного массива данных, количество строк и столбцов в котором не менее 3 - QBasic

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

Разработать программу обработки двумерного массива данных, количество строк и столбцов в котором не менее 3.

Решение задачи: «Разработать программу обработки двумерного массива данных, количество строк и столбцов в котором не менее 3»

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

CLS
DO
INPUT "n"; n
LOOP UNTIL n >= 3
DO
INPUT "m"; m
LOOP UNTIL m >= 3
DIM a(1 TO n, 1 TO m)
FOR i = 1 TO n
FOR j = 1 TO m
a(i, j) = INT(RND * 100 - 50)
PRINT a(i, j);
NEXT j
PRINT
NEXT i
'нахождение суммы всех элементов массива
s = 0
FOR i = 1 TO n
FOR j = 1 TO m
s = s + a(i, j)
NEXT j
NEXT i
PRINT "S="; s
'нахождение максимального элемента массива
max = a(1, 1)
FOR i = 1 TO n
FOR j = 1 TO m
IF a(i, j) >= max THEN max = a(i, j)
NEXT j
NEXT i
PRINT "max="; max
END

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

В первой строке используется команда CLS для очистки экрана.
Затем пользователю предлагается ввести количество строк массива (n) и количество столбцов массива (m). Цикл LOOP UNTIL используется для повторного запроса ввода, если пользователь вводит значение меньше или равное 3.
Далее двумерный массив a размером n на m инициализируется с помощью команды DIM a(1 TO n, 1 TO m).
Следующий цикл FOR i = 1 TO n используется для заполнения массива a случайными целыми числами в диапазоне от 0 до 100. Каждое значение записывается в соответствующую ячейку массива a(i, j).
Затем цикл FOR j = 1 TO m используется для вывода значений массива a на экран.
Сумма всех элементов массива a вычисляется с помощью цикла FOR i = 1 TO n, который перебирает строки массива, и цикла FOR j = 1 TO m, который перебирает столбцы массива. Значение переменной s увеличивается на сумму соответствующих элементов массива a.
Максимальный элемент массива a находится с помощью цикла FOR i = 1 TO n, который перебирает строки массива, и цикла FOR j = 1 TO m, который перебирает столбцы массива. Если текущий элемент массива a(i, j) больше значения переменной max, то max обновляется.
Значения переменных s и max выводятся на экран с помощью команды PRINT.
Код заканчивается командой END.