Question

Пожалуйста помогите срочно! Подсчитать количество отрицательных элементов двумерного массива в котором 3 строки и 4 столбца , заполнить вручную!! очень надо, заранее спасибо!

Answer 1

Var
a:array[1..3, 1..4] of integer;
    n, i, j:integer;

begin
   n:=0;
   for i:=1 to 3 do
    for j:=1 to 4 do
    read(a[i, j]);
   for i:=1 to 3 do
    for j:=1 to 4 do
    if a[i, j]<0 then n:=n+1; 
  writeln('Количество', n);
   for i:=1 to 3 do
    begin 
    for j:=1 to 4 do
    write(a[i, j]:4);
    writeln;
    end;
  end.

Answer 2

Var a:array[1..3] of array [1..4] of integer;
i,j,k:integer;
begin
for i:=1 to 3 do
   for j:=1 to 4 do begin 
   read(a[i,j]); 
   if a[i,j]<0 then k+=1; 
   end;
writeln(k);
end.

Answer 3

Конечно, помогу! Давайте заполним двумерный массив вручную:

1 -2 3 -4 -5 6 -7 8 9 -10 11 -12

Теперь посчитаем количество отрицательных элементов в этом массиве. Мы видим, что у нас есть 6 отрицательных чисел: -2, -4, -5, -7, -10, -12.

Таким образом, количество отрицательных элементов в данном двумерном массиве равно 6.

Надеюсь, это поможет вам!