Подсчитать количество нечётных элементов массива а(20) случайных чисел. массив задан на интервале [0; 100]
нуразмед
3
04.10.2019 13:10
0
Другие вопросы по теме Информатика
Про100олюшка
25.02.2020 19:01
Малинка1232
20.02.2020 14:23
ojitovtitan
20.02.2020 14:27
ruslanchiksmirozrw6o
10.02.2021 18:30
1882
02.03.2021 12:38
ШкОлА1337228
02.03.2021 12:37
galinadik84
13.09.2019 05:50
Brot2007
13.09.2019 05:50
tamilyamehtiev
13.09.2019 05:50
Популярные вопросы
- Кданным словам подбери близкие по значению удачливый...
2 - Обчисліть об`єм водню,що виділився при взаємодії 13 г цинку з hi...
1 - Use, try, help, seem, move - это неправильные или правильные глаголы? какие...
3 - Почему кольцо {0} не является полем?...
3 - Кчему приводит недостаток и переизбыток тимуса?...
2 - 25 № 1. в каких из нижеперечисленных случаев совершается механическая работа:...
2 - Кmno4 + hcl = чему равна сумма коэффициентов?...
2 - Укажите предложение,в котором есть лишнее по смыслу слово. 1.снег кружится...
1 - Прилумать предложения со словами бушевал,обливал,хлкстал...
1 - Дорогие, определите степень окисления элементов и тип хим. связи в соединениях:...
1
const n=20;
var a:array[1..n] of integer;
i,k: integer;
begin
for i:=1 to n do
begin
a[i]:=random(101);
if a[i] mod 2 <> 0 then k:=k+1;
write (a[i],' ')
end;
writeln;
writeln(k)
end.