CLS
REM Программа массив-матрица
DIM А[3,4]: S=0
FOR I=1 TO 3
FOR J=1 TO 4
INPUT A[I,J]
S=S+A[I,J]
NEXT J
NEXT I
?"S="; S
END
Описание программы:
После задания размерности массива (4х5=20 ячеек) оператором DIM А[3,4] и ввода первого значения сумы S=0 открывается цикл по номеру строки массива I, первое значение I=1, затем открывается вложенный цикл по номеру столбца массива J и присваивает первому J значение 1, т.е. в массиве указывается элемент первой строки первого столбца А[1,1]. Оператором INPUT A[I,J] вводится элемент А[1,1], т.е. число 9, затем оно складывается с первым значение S=0, т.е. S=0+9=9.
Оператор NEXT J возвращает программу к своему FOR…, где J становится равным 2 (индекс строки I ещё равен 1), далее вводится элемент A[1,2], равный -4, он прибавляется к предыдущему S, т.е. получается S=9+(-4) = 5 и т.д. Нетрудно заметить, что при такой организации вложения циклов элементы массива А считываются построчно – 1-я строка I проходится по всем столбцам J, затем 2-я строка и т.д. После перебора построчно всех элементов значение накопленной суммы S выводится на экран и программа завершается.
Пример 3 Вычислить произведение элементов главной диагонали массива А[4,4]