Найти количество не отрицательных нечетных элементов двумерного массива.
Найти количество не отрицательных нечетных элементов двумерного массива.
Гость
Ответ(ы) на вопрос:
ГостьНа паскале
---
uses crt;
const n=3;
m=3;
var a: array [1..n,1..m] of integer;
x,y,k: integer;
begin
k:=0;
for x:=1 to n do begin
for y:=1 to m do begin
a[x,y]:=random(21)-10;
if a[x,y] mod 2=1 then inc(k);
write(a[x,y]:4);
end;
writeln;
end;
writeln('Количество неотрицательных нечетных элементов: ',k);
end.
Не нашли ответ?
Похожие вопросы