Написать программу на языке Паскаль для решения следующей задачи:
Дано четырехзначное число, которое вводится с клавиатуры пользователем. Посчитать количество четных и нечетных цифр во введенном числе.
На проверку нужно прислать СКРИНШОТЫ окна программы с кодом и результатами работы. Входные данные задать самостоятельно.
suleymanovrusl
1
10.01.2021 15:46
34
Другие вопросы по теме Информатика
МастерФейк
07.12.2021 18:55
MadMax818
19.03.2019 13:40
neologisms
19.03.2019 13:30
timursharipov2
19.03.2019 13:30
NamaruC3
19.03.2019 11:17
6811694978ффф
19.03.2019 11:21
ιιIαγρμα
19.03.2019 11:33
IÎrîskåI
19.03.2019 11:35
Популярные вопросы
- Выберите верное значение в жизнедеятельности организмов 1) избавляет от вредных...
2 - Допишите СПП с придаточными изъяснительными с союзных слов и частиц как, что,...
2 - Айтылым 5 - тапсырма . Мәтіннен құрамында антонимі бар сөйлемдерді теріп жаз...
3 - Запишите в виде двойного неравенства | x | = 9 с решением...
1 - . 1) Запишите в виде двойного неравенства с модулем:|2+3х| 4,7 пожайлуста...
1 - Сколько оборотов стрелками должны сделать ребята? Почему?...
1 - Составь систему данных неравенств и реши их: 1) |2х+1| 3;2) |3х-2| 11;3) |4+3х|≥0....
3 - От чего зависит пылеемкость ткани? ...
3 - 3. Допиши основные понятия. 1) Первый спутник Земли был запущен с космодромаИ2)...
3 - Установи соответствие между значками и их описаниями рис.1 Заставка рис.2...
3
вроде так, но предупреждаю ответ не мой
##
uses School;
var n := ReadInteger;
var ko := n.Digits.Where(t-> t.IsOdd).Count;
Print('Нечетных', ko, 'четных', 4 - ko)