tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Известно, что из четырех
Известно, что из четырех чисел a1, a2, a3, a4 одно отлично от трех других, равных между собой. найдите это число. решить на языке паскаля.
savyak444ozb52q
2 25.06.2019 18:20
22
Ответы
Kiko2802
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Zay4565
05.11.2020 12:41
А) Используя шифр Цезаря с ключом -2, зашифруй слово: Шифр Б) Используя шифр Цезаря с ключом 3, декодируй слово: ЗЛБна картинке таблица ...
Дашакотик010405
05.11.2020 12:40
Для хранения текста требуется 72000 бит. Сколько страниц займёт этот текст, если на странице размещается 25 строк по 60 символов в строке? Вес каждого символа компьютерного...
Evgenevgenevgen
19.06.2019 22:40
Найти произведение всех элементов двумерного массива, больших заданного числа...
mrdanildanDan
08.04.2020 15:49
Написать в развернутом виде числа А3=0,25341...
zhenyaamelkov2
17.06.2019 08:40
5(paskal). нужно решения, пример(это то, что начинается с begin, заканчивается end, с командой read). надеюсь вы меня поняли, саму программу писать не надо, просто текст...
Pasha2322
17.06.2019 08:40
Паскаль! определить и вывести на экран количество натуральных чисел, меньших 1000 делящихся на 5 и 7 одновременно...
Mashoo4rik
02.11.2019 23:39
Где и как зародился фэндом countryhumans?...
kaverzinaksenia
02.11.2019 23:39
I. укажите номера верных утверждения.1) дае прямые могут разбить плоскость и четыре части.2) да лучи, лекащие по однои прзащие на одной прямой, называются дополнительmiam.3)...
Юлька1150989776543
02.11.2019 23:35
Сделать лабораторную,под буквой д) и вывод...
fkireeva
02.11.2019 23:35
Пожее написать мини сочинение про своего врача...
Популярные вопросы
На какую высоту нужно подбросить мяч массой 0,5 кг чтобы он приобрел...
2
Водной комнате находится 4 девушки и 7 юношей. на удачу выбирают два...
1
Если начались подземные толчики какое наиболее безопасное место нужно...
1
Вкаких районах земли столкновение с айсбергом может угрожать ?...
3
Вкомнате няни она обычно читала наизусть письма арины родионовны,которые...
1
Дан прямоугольный треугольник abc с гипотенузой bc. окружность радиуса...
1
Укажите слово, которое обозначает признак предмета - жизненный, жива...
3
Начертите луч с единичным отрезком,в 2 раза большим,чем в пункте 1.отметь...
1
Вмагазин 240 кг картофеля и 360 кг свеклы. какую часть всех овощей...
1
Решите систему сложения. {2n+m=5 {2n-m=11...
3
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.