Question

Помогите пожалуйста!)
Задание 3.
Дана квадратная матрица размерностью N. Подсчитать количество отрицательных элементов по строкам. ВВЕДИТЕ РАЗМЕРНОСТЬ МАТРИЦЫ N:-
->5
Через пробел введите N*N элементов массива:
--> 10 3 2 6 8
3 -2 7 -1 4
4 5 -10 9 -12
5 0 2 4 5
6 3 -3 -5 2
Количество: 0,2,2,0,2

Answer 1

Решение
var
a: array [1..30, 1..30] of integer;
i, j, n, k: integer;

begin
readln(n);
for i:=1 to n do
 for j:=1 to n do read(a[i,j]);
for i:=1 to n do
begin
k:=0;
 for j:=1 to n do
 if a[i, j]<0 then inc(k);
write(k, ' ');
end;
end.

Если есть вопросы, пиши.

Answer 2

ничего страшного. спасибо за помощь)