Главная arrow icon Вопросы arrow icon Учеба и наука arrow icon Информатика arrow icon Помогите с написанием программы на паскале…

Помогите с написанием программы на паскале пожалуйста - вопрос №4324923

Нужно написать программу на языке Паскаль для решения следующей задачи:

Дано четырехзначное число, которое вводится с клавиатуры пользователем. Посчитать количество четных и нечетных цифр во введенном числе.

Регина
14.05.21
Учеба и наука / Информатика
1 ответ
информатика
паскаль
задача

Лучший ответ по мнению автора

Сергей Николаевич

var x,y,z,ch,nch:integer;

begin

readln (x);

while x>0 do begin

z:=x mod 10;

x:=x div 10;

if z mod 2=0 then

 ch:=ch+1

else

 nch:=nch+1;

end;

writeln ('Четных: ',ch,' Нечетных: ',nch);

end.
14.05.21
Лучший ответ по мнению автора

Еva
от 100 p.
Рейтинг: 121 998
6-й в Учебе и науке
Читать ответы
Посмотреть всех экспертов из раздела Учеба и наука > Информатика
Похожие вопросы
Пользуйтесь нашим приложением Доступно на Google Play Загрузите в App Store
  • карты visa
  • карты master card
  • карты maestro
  • карты МИР
Мы используем файлы cookie. Пользуясь сайтом, вы принимаете условия нашего соглашения. Принять Детальнее