Программа. REM Программа матрица -ввод, обработка

CLS

REM Программа матрица -ввод, обработка

DIM А[4,4]: Р=1

FOR I=1 TO 4 ' Блок ввода:

FOR J=1 TO 4 ' ввод всех

INPUT A[I,J] ' элементов

NEXT J ' массива

NEXT I ' в ОЗУ

I=1: J=1 ' обработка

m14: P=P*A[I,J] ' введённых

I-I+1: J=J+1 ' элементов

IF I<=4 THEN m14 ' массива

?"P="; Р '

END

Описание программы:

После задания размерности массива и присвоения начальному произведению Р значения 1 (DIM А[4,4]: Р=1) во вложенном цикле по I и J вводятся все элементы матрицы (построчно), затем введённый массив обрабатывается, в данном случае вычисляется произведение главной диагонали.

Поскольку в главной диагонали задействованы только элементы А₁₁, А₁₂, А₂₁, А₂₂, то можно заметить, что для них индексы I и J изменяются (увеличиваются на 1) одновременно, поэтому цикл нужно организовать вручную, с помощью оператора IF…. Для этого присваиваем I и J значения 1, тем самым получим элемент A[1,1], потом умножаем его на предыдущее значение Р=1, затем увеличиваем I и J на 1 и выполняем проверку – если I ещё меньше 4, то программа возвращается по метке m14 к увеличению произведения, если I уже больше 4, т.е. программа вышла за пределы матрицы, то Р распечатывается и программа заканчивается.

Проверка на выход из размеров матрицы могла бы быть организована и по J<=4, это некритично.

Особенностью программы является то, что она состоит из двух частей – ввод массива в память и обработка массива, уже находящегося в ОЗУ компьютера. В примерах 1 и 2 элемент массива вводился и сразу обрабатывался согласно заданию (найти произведение чётных элементов, найти сумму всех элементов). Данная программа является универсальной, т.к. этап ввода массива в память должен выполняться всегда, а виды обработки могут быть в каждой задаче разными (см. примеры 4 и 5).

Пример 4 Вычислить сумму и количество отрицательных элементов второго и третьего столбцов массива А[4,4] из примера 3.