Ответы
Ответ дал:
1
const
n=5; m=6;
var
b:array [1..n,1..m] of integer;
i,j,pol,pus:integer;
begin
pus:=0; pol:=0;
for i:=1 to n do
begin
for j:=1 to m do
begin
b[i,j]:=random(21)-10;
write(b[i,j]:4);
if (b[i,j]>0) then
inc(pol)
else
if b[i,j]=0 then
inc(pus);
end;
writeln;
end;
writeln('Положительных: ',pol);
writeln('Отрицательных: ',n*m-pus-pol);
end.
korshundenchik:
А откуда вы взяли n=5 и m=6
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад
8 лет назад