(паскаль) написать программу которая запросит ввести с клавиатуры 3 числа и выведит на экран большее из них. если числа равны программа должна вывести надписть, что числа равны.
186
314
Ответы на вопрос:
//pascalabc.net //версия 3.3.5, сборка 1650 begin var (a,b,c): =readreal3; if (a=b) and (b=c) then write('числа равны') else write(max(max(a,b),c)); end.
Program qq; uses crt; var a,b,c,max: longint; begin readln(a); readln(b); readln(c); max: =a; if b> max then max: =b; if c> max then max: =c; if (a=b)and(b=c)and(a=c) then writeln('числа равны') else writeln(max); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
shipashka14.05.2023 14:22
-
temaganenko26.03.2022 22:08
-
ZHICH04.01.2023 05:07
-
Азиза419028.07.2022 02:14
-
zhan0504197610.05.2023 02:43
-
ИгорьВсемогущий03.01.2021 15:04
-
marinagridina3431.10.2021 16:38
-
vladamaslanik18.10.2021 12:18
-
aidarbI412307.05.2023 15:36
-
Viktoria23560103.06.2021 08:23
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.