Дан массив с [1:20], элементами которого являются случайные числа из интервала (0, 200). Определить количество элементов, которые являются нечетными числами.
// PascalABC.NET 3.0, сборка 1157 от 02.02.2016
begin
var c:=ArrRandom(20,0,200); c.Println;
Writeln(Кол-во нечетных: ,c.Where(x->Odd(x)).Count);
end.
Тестовое решение:
120 175 140 191 3 64 105 106 192 174 21 166 149 179 32 166 69 78 158 48
Кол-во нечетных: 8
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
