Помогите по Паскалю."Сосчитать количество четных и нечетных чисел, введенных с кл??виатуры.Всего вводится n чисел."

?виатуры.Всего вводится n чисел."

Ответы:

АЛИНА СОЛДАТЕНКО

11-12-2018 13:21

Var a, b, c, d:lontgint;Begin A:=0; b:=0;Read(n) ;For c:=1 to n do beginRead (a) ;If a mod 2=0 then a:=a+1Else b:=b+1; end;Write (a, , b) ;End.

Также наши пользователи интересуются:

Помогите пожалуйста! сделать задания выделенные в кружок Помогите пожалуйста.Заранее спасибо!Нужно продолжить запись и объяснить решение:

Картинка с текстом вопроса от пользователя Denya Guschin

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Помогите по Паскалю."Сосчитать количество четных и нечетных чисел, введенных с кл?» от пользователя Denya Guschin в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!