Ответы на вопрос:
Pascal ABC
var a,b,c,d,max,min:real;
begin
readln(a,b,c,d);
if (a>b) and (a>c) and (a>d) then max:=a else if (a<b) and (a<c) and (a<d) then min:=a;
if (b>a) and (b>c) and (b>d) then max:=b else if (b<a) and (b<c) and (b<d) then min:=b;
if (c>a) and (c>b) and (c>d) then max:=c else if (c<a) and (c<b) and (c<d) then min:=c;
if (d>b) and (d>c) and (d>a) then max:=d else if (d<b) and (d<c) and (d<a) then min:=d;
writeln('Наибольшее число: ',max);
writeln('Наименьшее число: ',min);
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Медуха18.06.2021 14:31
-
enotic00926.08.2021 02:16
-
mirnillas28.06.2023 11:12
-
tatyanalarina217.08.2020 06:39
-
ZVERO9S4R03.02.2023 03:13
-
розасит200618.11.2020 02:10
-
destroyer080020.12.2020 07:31
-
2017minikot20.05.2021 08:21
-
ВладаФролова0104.11.2022 13:41
-
Leramedvedeva1223.08.2020 22:56
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.