напишите программу, которая в последовательности определяет количество нечетных чисел ,...

0 голосов
297 просмотров

напишите программу, которая в последовательности определяет количество нечетных чисел , не оканчивающихся на 1 . Программа получает на вход количество чисел в последовательности, а затем сами числа. Количество чисел не превышает 1000. Введённые числа не превышают 30000. Программа должна не оканчивающихся на 1 вывести одно число - количество нечётных чисел последовательности, не оканчивающихся на 1


Информатика (12 баллов) | 297 просмотров
0

язык?

0

Задание надо сделать на языке программирования , паскаль

Дан 1 ответ
0 голосов

Ответ:

PascalABC.NET 3.5.1

begin

 var N := ReadInteger('N = ');

 var S := ReadSeqInteger(N);

 S.Where(p -> (p mod 2 <> 0) and (p mod 10 <> 1)).Count.Println;

end.

Объяснение:

(1.6k баллов)