Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
medewwnik
22.07.2022 17:10 •
Информатика
Даны три целых числа. определите, сколько среди них . программа должна вывести одно из чисел: ■ 3 – если все ; ■ 2 – если два совпадает; ■ 0 – если все числа различны.
Показать ответ
Ответ:
ladusik69
26.08.2020 23:29
Var a,b,c:integer;
begin
readln(a,b,c);
if (a=b)and(b=c) then writeln(3)
else if (a=b)or(b=c)or(a=c) then writeln(2)
else writeln(0);
end.
Пример:
5 7 5
2
0,0
(0 оценок)
Популярные вопросы: Информатика
ivoleg13
01.02.2022 19:56
Написать программу которая находит число p=(1-1/2)(1-1/3)*-1/n) выведите квадраты n натуральных чисел...
znaniacom945
07.09.2022 11:44
Запишите формулу , которая соответствует выражению, записанному на языке программирования pascal: (sqr(7)-15)/ sqrt((a*b)...
sob000
25.02.2020 20:37
Как человек использует знания о дыхание растений в своей деятельности...
matveibr
25.02.2020 20:37
[a: nse)что это за слово по транскрипции...
zlatasidorowa
25.02.2020 20:37
Найди безударные гласные в корне и подчеркни буквы,которыми они обозначаются.солнце согрело землю.по дорожке побежал ручей.вот он заметил норку.ёж ещё с осени облюбовал это...
Smpl
25.02.2020 20:37
Что больше ядро галактики или солнечная система? +объяснение...
liliverbovetska
25.02.2020 20:37
Какое количество теплоты требуется для обращения в пар 200г воды взятой при температуре 20 градусов.решите и изобразите процесс графически. с графиком...
динозавр777
25.02.2020 20:37
Составьте предложение со словом сочи...
zulyarakhimovaa
25.02.2020 20:37
Коп нуктенин орнына карамен жазылган создердин сурагын койып жумбактарды коширип жаз шешуин тап тонгакты ,аяк .жайган жастыксогилди, тогилди.улпилдеген калпагы ескен желден...
kopil199420p017kl
25.02.2020 20:37
Разгадай на нём переносят посуду девочка-друг подставка для свечи охраняет границу...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a,b,c);
if (a=b)and(b=c) then writeln(3)
else if (a=b)or(b=c)or(a=c) then writeln(2)
else writeln(0);
end.
Пример:
5 7 5
2