Даны натуральные числа n, а1...аn. Определить количество членов последовательности,

Даны естественные числа n, а1...аn. Найти количество членов последовательности, являющихся нечетными числами.

Задать свой вопрос
1 ответ
// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программка не работает, обновите версию!

begin
  Writeln('Нечетных ',ArrRandom(ReadInteger('n='),1,50).Println.
      Where(t-gt;t.IsOdd).Count)
end.

Пример
n= 13
22 1 13 21 36 4 43 1 46 18 29 6 15
Нечетных 7

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт