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

мила905 мила905    2   24.04.2020 08:40    7

Ответы
лолкекчибурек1 лолкекчибурек1  13.10.2020 19:38

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.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика