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

Question

Написать программу, которая определяет количество четных чисел из введенной с клавиатуры последовательности N чисел. Написать программу на Паскале.

Answer 1

52

drel86

25 февраля 2023

Например если вводится 3 числаvar a,b,c,x: integer; beginx: =0; Read (a,b,c); if a mod 2=0 then x: =x+1if b mod 2=0 then x: =x+1; if c mod 2=0 then x: =x+1; Writeln ('Chetnuh chisel=' ,x); end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: