![Debakisgi](https://sproshu.net/uploads/ava/2/ava9389.jpg)
Debakisgi
4 год назад
Пожалуйста!!!!!ПаскальДан массив из N элементов. Определить количество элементов, которые являются нечетными числами.
ОТВЕТЫ
![Oleg](https://sproshu.net/uploads/ava/3/ava1385.jpg)
Oleg
Oct 24, 2020
begin
Writeln('Нечетных: ',ArrRandom(ReadInteger('n='),-99,99).Println
.Where(x->x.IsOdd).Count)
end.
n= 15
-91 88 -55 -11 -12 -84 53 86 27 -18 -57 -61 13 -94 -48
Нечетных: 8
430
Смежные вопросы: