Дан массив из N элементов. Определить количество элементов, которые являются нечетными числами. в Паскале.
Ответы
Ответ дал:
1
Const w=10000;
var
i,n,sum:integer;
a:array[1..w] of integer;
begin
writeln('Введите кол-во элементов в массиве');
readln(n);
for i:=1 to n do
begin
a[i]:=random(100);
if (a[i] mod 2<>0) and (i mod 2 = 0) then
inc (sum);
end;
writeln(sum)
Удачи
Ответ дал:
0
Ответ:
Это элементарно
var i,n,sum:integer;
Const w=10000;
a:array[1..w] of integer;
begin;
writeln('Введите кол-во элементов в массиве');
readln(n);
for i:=1 to n do
begin
a[i]:=random(100);
if (a[i] mod 2<>0) and (i mod 2 = 0) then
inc (sum);
end;
writeln(sum)
end.
Вас заинтересует
4 месяца назад
4 месяца назад
6 месяцев назад
6 месяцев назад
2 года назад
2 года назад
7 лет назад