В математике матрица это прямоугольная таблица, образованная из элементов некоторого множества и составляет с m строк и n столбцов. Если 
таблица называется прямоугольной матрицей размера 
. Если 
матрица называется квадратной, а число m – ее порядком.
Рассмотрим эту задачу на примере матрицы 
. Выучим условия какие присутствуют в этом примере: 
, 
, 
(i – номер строки, j – номер столбца).
Равные индексы ( ) имеют элементы главной диагонали. Если ( ), то элементы расположены над главной диагональю (i изменяется от 1 до 3, j изменяется от 2 до 4). Если ( ), то элементы расположены под главной диагональю (i изменяется от 2 до 4, j изменяется от 1 до 3).Учитывая эти соображения, запишем формулу для вычисления элемента матрицы
program N2;
const m=4;
var A:array [1..m,1..m] of byte;
i,j,n:byte;
begin
//Создание матрицы по заданному правилу
for i:=1 to m do
for j:=1 to m do
if i=j then A[i,j]:=1
else
if i<j then A[i,j]:=4
else A[i,j]:=5;
//Вывод матрицы на экран
for i:=1 to m do
begin
for j:=1 to m do
write(a[i,j],' ');
writeln
end;
end.
Дана прямоугольная матрица размером 3*4. Найти количество нулевых элементов в каждом столбце матрицы
хотя бы
program DM;
const m=3; n=4;
var a : array [1..m,1..n] of byte;
i, j, k : byte;
begin
writeln('Vvedite matrizu razmerom ',m,'*',n);
//Создание матрицы
For i:=1 to m do
For j:=1 to n do
read(a[i,j]);
For j:=1 to n do
begin
k:=0;
For i:=1 to m do
if A[i,j]=0 then k:=k+1;
writeln('v ',j, ' stolbze ',k, ' elementov');
end;
readln ;readln
end.
