Количество отрицательных элементов под главной диагональю матрицы
Определить количество отрицательных элементов квадратной матрицы, расположенных под ее главной диагональю.
Главная диагональ матрицы идет из левого верхнего угла в нижний правый. Пусть индексом i обозначаются номера строк, а j - номера столбцов (константами N и M обозначим количество строк и столбцов соответственно). У элементов главной диагонали значение этих индексов равно между собой. У элементов ниже главной диагонали значение i будет меняться от 2 до N, а значение j от 1 до i-1.
const
N = 5; M = 5;
var
a: array[1..N,1..M] of integer;
i, j, count: byte;
begin
randomize;
for i:=1 to N do begin
for j:=1 to M do begin
a[i,j] := random(10)-5;
write(a[i,j]:3);
end;
writeln;
end;
count := 0;
for i:=2 to N do
for j:=1 to i-1 do
if a[i,j] < 0 then
count := count + 1;
writeln(count);
end.
Пример выполнения кода:
-4 -2 -2 -2 -2
4 -2 -3 -5 0
0 -5 -3 -4 -2
3 -4 4 -1 4
-3 4 2 -3 -5
4