Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
DeStreudG
08.01.2022 06:14 •
Информатика
Известно, что из четырех чисел a1, a2, a3, a4 одно отлично от трех других, равных между собой. найдите это число. решить на языке паскаля.
Показать ответ
Ответ:
Методист228
20.07.2020 19:55
Var a1,a2,a3,a4:real;
begin readln(a1,a2,a3,a4);
if (a1<>a2) and (a1<>a3) then writeln(a1);
if (a2<>a1) and (a2<>a3) then writeln(a2);
if (a3<>a1) and (a3<>a2) then writeln(a3);
if (a4<>a3) and (a4<>a2) then writeln(a4);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kvpopochku
11.12.2022 10:17
1. Программа тілдерін қалай топтасытруға болады?...
HuKuTKa228
18.11.2020 06:26
Доступ к файлу jazz.mp3, находящемуся на сервере music.com, осуществляется по протоколу http. фрагменты адреса файла закодированы буквами от а до ж. запишите последовательность...
ева514
31.03.2021 01:33
Составить программу, которая создает и выводит на экран массив такого вида: 0 1 1 1 1 1 0 1 0 1 1 1 0 1 1 1 0 1 0 1 1 1 1 1 0 1 1 1 1 1 0 1 0 1 1 1 0 1 1 1 0 1 0 1 1 1 1 1...
Arslanisyan
09.02.2021 16:55
Какими свойствами обладает каждый магнитный диск ?...
аноним0000001
04.09.2020 03:35
2. Прочитай завдання. Учасникам шкільної вікторини запропоновано 10 за-питань. За кожну правильну відповідь нараховується ів, а за неправильнузнімається ів.Скільки правильних...
angalena
21.10.2020 22:47
10. Поставь общие вопросы. 1. The children take vitamins.2. Paul eats healthy food,3. Ted was ill last week.4. Kelly has got a headache.5. There is some soup in the plate.6....
Yabloco4
21.04.2020 01:34
у меня мало отдаю последние 50 юаллов...
Gagatyngerz
21.04.2020 01:34
Напишите уравнения реакций, с которых можно осуществить следующие превращения:ch4-ch3br-c2h6-c2h4-c2h4br2 б) CH4 → CH3Br → C2H6 → C2H4 → C2H5OH → C2H4 → (—CH2—CH2—)n ....
lasalina
14.04.2023 19:00
В цилиндрическое ведро с площадью дна 500см² налита вода, занимающая объем 12л. каково давление воды на стенку ведра на высоте 10см от дна? Атмосферное давление не учитывать....
MashaNicoleta
14.04.2023 19:00
Неліктен Томирис Кирге тұрмысқа шығуға келісім бермеді?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin readln(a1,a2,a3,a4);
if (a1<>a2) and (a1<>a3) then writeln(a1);
if (a2<>a1) and (a2<>a3) then writeln(a2);
if (a3<>a1) and (a3<>a2) then writeln(a3);
if (a4<>a3) and (a4<>a2) then writeln(a4);
end.