Блог для маленьких школьников и их родителей
ШколаЛа

ПОЖАЛУЙСТА! 25 БАЛЛОВ! ТАКОГО В ИНЕТЕ НЕТ! PASCAL Напишите программу, которая в последовательности целых…

Автор:
Предмет: Информатика
Уровень: 5 - 9 класс

ПОЖАЛУЙСТА! 25 БАЛЛОВ! ТАКОГО В ИНЕТЕ НЕТ! PASCAL

Напишите программу, которая в последовательности целых чисел определяет количество четных чисел. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Программа должна вывести одно число: количество чётных чисел.

Ответов к вопросу: 1
  • narinekirakosyan0206
    07.08.2024 | 09:47

    ===== PascalABC.NET =====
    begin
     ReadSeqIntegerWhile(p -> p <> 0).Count(p -> p.IsEven).Print
    end.

Ответить на вопрос:
:p :-p 8) 8-) :lol: =( :( :-( :8 ;) ;-) :(( :o:
Нажимая на кнопку я даю согласие на обработку персональных данных и принимаю политику конфиденциальности.