Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Лиля4032
15.06.2020 03:16 •
Информатика
Даны 3 числа проверить что они все различны
Показать ответ
Ответ:
андрей2149
06.10.2020 02:18
Если я правильно понял вопрос, то так:
var a, b, c:int64;
begin
read(a);
read(b);
read(c);
if (a<>b) and (a<>c) and (b<>c) then write('Chisla razlichni')
else write('Chisla ne razlichni');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kisa93445
09.02.2023 04:11
решить задачу на питоне Для положительного целого числа n определим функцию f: f(n) = - 1 + 2 - 3 + .. + ( - 1) n n входные данные:4 выходные данные:2...
Negumanitariy
21.04.2021 09:20
Запишите в римской системе счисления числа: 9, 90, 900, 49, 490, 999...
AllaStepanova85
24.04.2022 18:16
Как найти флешку в ноутбуке...
Ramiz2005
27.05.2021 03:55
Найти произведение двузначных чисел кратных трём и двум ...
EHOT229
29.10.2021 06:01
Найти площадь треугольника, если значение основания вводится с клавиатуры. А высота в 1,5 раза меньше длины....
FYBKF
24.11.2020 15:35
Программирование я тут ошибку допустил, исправьте:var m,u:real;begin write( Введите массу тела (кг): ); readln(m); write( Введите скорость тела (м/c): ); readln(u); write( Кинетическая...
AndreyDixord
13.12.2022 13:47
на поверхности пруда плавает одна кувшинка,которая постоянно делится и разрастается. Таким образом,каждый день площадь,которую занимают кувшинки,увеличиваются в два раза...
tatyanamost
02.02.2020 14:52
Сказки и легенды народов саратовского края...
незнайка3333333333
02.02.2020 14:52
Раскройте скобки в предложениях,взятых из сказки ю.олеши три толстяка.укажите условие выбора слитного или раздельного написание 《не》 прилагательными проверьте,есть ли у слова частицы...
Lartenok
02.02.2020 14:52
Решите уравнения: (180 : x) * 4 = 24, (x * 16) : 8 = 80, 248 - x * 36 = 176...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var a, b, c:int64;
begin
read(a);
read(b);
read(c);
if (a<>b) and (a<>c) and (b<>c) then write('Chisla razlichni')
else write('Chisla ne razlichni');
end.