tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Даны три целых числа a,
Даны три целых числа a, b и c. найти количество чётных чисел среди них.
школьник228253
1 19.07.2019 22:50
1
Ответы
lolii0ikolik
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Benitto
13.08.2019 14:20
Значок корзина -это a системная папка b рабочая папка c ярлык d файл...
Ruslanchik111
13.08.2019 14:20
Цель компьютерной игры - складывать заданные пейзажи на поле 8x11 из отдельных пазлов. васе достался пейзаж с левой картинки, очерёдность появления и размеры пазлов...
КсюшаШто
13.08.2019 14:20
Прочитай пословицу и запиши её,заменив числа соответствующими буквами.1 10 13 18 9 29 3 5 7 20 29 25 27 29 20 5 29 24...
Easy66689
21.09.2019 07:20
Изи - . 1 прснльнй кмпьютр: сстмнй блк (мтрнск плт, цнтрльнй прцсср, пртвн пмть, жсткй дек), вншн стрств, клвтр, мшь, мнтр, прнтр, кстчек клнк). 2. в нужные места...
hdjdhd1
01.05.2020 09:18
Скласти алгоритм, записати блок-схему, розробити програму яка виконує відповідну обробку масиву та реалізує вказані дії. Розмір масиву визначте довільно n= від 5...
Марош3
17.02.2021 15:23
1. Составить программу подсчета количества ненулевых элементов в массиве В(15), если элементы массива целые положительные и отрицательные числа, задаются с клавиатуры....
АнастасияПобиленская
17.02.2021 15:22
дано натуральное число n ( 1 n 1188), определяющее возраст человека ( в месяцах). Выразить возраст в годах и месяцах , например 21 год 10 месяцев , 52 года 1 месяц...
jdjenud
17.02.2021 15:22
3. Массив из 10 элементов (заполнение определите самостоятельно). Найти наименьший из четных элементов. 4. Массив М[1..n] задан в диапазоне значений [-20..20]. Найти...
angelinalipanova03
17.02.2021 15:21
3 Number the pictures.1 space3 spaceport2 spacecraft4 satellite...
яна1767
18.11.2020 18:22
Нужна определи (+) или (-)...
Популярные вопросы
6(p-4)^2(p+4)-5(p-6)^2(p-6)^2 !!...
3
Твір як ми ремонтували кімнату 20 речень плі ів...
2
Что характеризовало систему двоевластия в России? Укажите один...
1
5. Which equipment is used in each sport? Match the equipment...
1
Найти общее решения y +2y +y=0...
1
Твір опис хати на 15 реченнь...
3
Каких предложениях допущены пунктуационные ошибки? Выбери все...
3
Как найти кПА (килопаскаль) при М (метры) и при Н (ньютон)Подскажите...
3
Биология. 7 класс. Кроссворд....
3
. Перепишите предложения, вставляя вместо точек слова из слов...
1
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.