Ответы на вопрос:
проверено - работает на паскаль авс:
program kovyarovsany; var x1,y1,x2,y2,x3,y3: integer; d1,d2,d3: real; begin write ('x1 = '); readln(x1); write ('y1 = '); readln(y1); write ('x2 = '); readln(x2); write ('y2 = '); readln(y2); write ('x3 = '); readln(x3); write ('y3 = '); readln(y3); d1: =sqrt(x1*x1+y1*y1); d2: =sqrt(x2*x2+y2*y2); d3: =sqrt(x3*x3+y3*y3); if (d1=d2) and (d1=d3) then writeln ('все три точки на одинаковом расстоянии от начала координат ') else if (d1=d2) and (d1< d3) then writeln ('точка 1 и точка 2 на одинаковом расстоянии от начала координат ') else if (d2=d3) and (d2< d1) then writeln ('точка 2 и точка 3 на одинаковом расстоянии от начала координат ') else if (d1=d3) and (d1< d2) then writeln ('точка 1 и точка 3 на одинаковом расстоянии от начала координат ') else if (d1< d2) and (d1< d3) then writeln ('точка 1 ближе всех') else if (d2< d1) and (d2< d3) then writeln ('точка 2 ближе всех') else writeln ('точка 3 ближе всех'); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
kvinlin201427.01.2021 16:45
-
dashanovikova0323.02.2020 17:22
-
Dariy6918.01.2022 06:02
-
Marry88812.05.2021 18:31
-
dinarashoeva28.05.2020 14:27
-
rustie08.11.2022 17:18
-
verymam30.11.2022 16:26
-
hfb125.06.2021 00:19
-
456akcyka25.05.2020 14:06
-
Niki191727.09.2020 16:01
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.