Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Viktor2017Kot
27.06.2020 11:28 •
Информатика
Даны три целых числа a, b и c. найти количество чётных чисел среди них.
Показать ответ
Ответ:
katyasota1
19.08.2020 13:52
//pascal
var a,b,c,n: integer;
begin
n:=0;
readln(a);
if a mod 2 = 0 then n:=n+1;
readln(b);
if b mod 2 = 0 then n:=n+1;
readln(c);
if c mod 2 = 0 then n:=n+1;
writeln('Четных : ', n);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
nyrlan13531
20.09.2022 05:13
Как называется число, которое вычисляется по специальному алгоритму на основании данных пакета, передаётся вместе с данными и служит для обнаружения ошибок в передаче?...
seocer
09.12.2021 00:01
Пішімдеу батырмалары не үшін қолданылады?...
dima1025
18.05.2021 10:30
У вас DVD- диск ёмкостью 4,7 гб, он двухсторонний. Сколько CD дисков вместится на DVD диск, если ёмкость CD диска 700мб...
мака2007
22.05.2021 04:25
Построить таблицу значений функции y=f(x), x изменяется от xmin до xmax с шагом dx. Проконтролировать правильность ввода xmin, xmax, dx и корректность вычисляемого выражения. Примечание....
POLINAFLY
30.01.2023 21:20
Рассчитайте время звучания моноаудиофайла, если при 16-битовом кодировании и частоте дискретизации 32000 его объём равет 3500 кбайт))...
бульбуль4
30.01.2023 21:20
Найти значение логического выражения? (x =2),или(y*y 4), при x=2,y=-2...
2547456
06.07.2021 05:06
Какое логическое выражение соответствует высказыванию «точка x принадлежит отрезку (a, b)»?...
123123258852
15.04.2023 03:25
Какое логическое выражение соответствует высказыванию: каждое из чисел x, y, z положительно ?...
Lesia3081984
24.08.2022 03:14
Какую информацию можно получить с органов зрения и слуха к картинкам птица, тюльпан, солнце, молния...
23452345torer
11.05.2023 14:40
Найти или составить для планшета ritmix rmd-855 через компьютер пробовала, но в компьютере планшет не виден. а то слетела....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a,b,c,n: integer;
begin
n:=0;
readln(a);
if a mod 2 = 0 then n:=n+1;
readln(b);
if b mod 2 = 0 then n:=n+1;
readln(c);
if c mod 2 = 0 then n:=n+1;
writeln('Четных : ', n);
end.