tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Даны 3 числа a,b,c. определить,
Даны 3 числа a,b,c. определить, имеется ли среди них хотя бы одна пара взаимно обратных чисел. ,!
roseflover2005
3 31.05.2019 02:00
6
Ответы
zlu4ka11
01.07.2020 11:59
VAR
a,b,c: LongInt;
BEGIN
Read(a,b,c);
if (a*b = 1)or(a*c = 1)or(b*c = 1) then Write('ДА')
else Write('НЕТ');
END.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
egoregorcherk
04.07.2019 02:30
Расставьте знаки = в следуещей цепочке : 20...
Anjik20125
05.03.2021 14:51
60//12round (25.2643,2)math.trunc (-5.6)math.modf (25.267)...
AnastasiyaEstDetey
05.03.2021 14:51
Солемди толыктырыныз Багдарламалау жуйелер Багдарламалау тилдери...
buzaeva2013
05.03.2021 14:52
Для чего в робототехнике используется тохометр одометр и секундомер...
maxmaxibon11
17.05.2021 08:26
ПАСКАЛЬ. Заполните массив случайными числами в интервале [-50,75] и найдите среднее арифметическое его значений. Решите задачу используя процедуру....
1903vita
17.05.2021 08:25
Установите соответствие между понятием и его определением: * 1) Объект интеллектуальной собственности2) Плагиат3) Авторское правоа) право автора на созданные им произведения...
elvin38
17.05.2021 08:24
В документе было выставлено 7 сносок. В результате работы с документом было удалено 2 обычные сноски и 3 концевые сноски. Затем было добавлено: 1 концевая и 3 обычных...
21dasha21
16.05.2020 02:34
Какое число будет выведено на экран: Writeln ( - 50 mod 5) ? –50 0; – 10; 10....
Babocka1415
16.05.2020 02:33
Какие команды входит в меню ,как они отдаются...
Эмиль08072013
16.05.2020 03:17
Https://thriveglobal.com/events/full-watch-365-dni-365-days-2020-online-movie-free-world-movies/?preview=true https://thriveglobal.com/events/full-watch-365-dni-365-days-2020-online-movie-free-xnxx-movies/?preview=true...
Популярные вопросы
Прочитай текст. распрострони его. растёт трава. кланяются колокольчики....
2
Составить предложение со словом размерчик...
1
Паделить на слоги слова другом, бурые, носятся, серые, полосотые,...
1
Морфологический разбор слова пожелтевший 1н.ф 2п.п н.п....
2
Токар виготовив 100 деталей.перші 3 год він робив по12 деталей...
1
Составить рассказ на тему в осеннем лесу...
1
Як правильно написати хрещатий чи хрищатий...
2
Из 200 арбузов 16 оказались незрелыми.сколько процентов всех арбузов...
1
За какое время на электроплитке можно два литра воды взяты при...
2
62 м 30 см: 35-53 м 90 см: 70 решить пример !...
2
a,b,c: LongInt;
BEGIN
Read(a,b,c);
if (a*b = 1)or(a*c = 1)or(b*c = 1) then Write('ДА')
else Write('НЕТ');
END.