Паскаль! на плоскости заданы три точки своими координатами. определить расстояние от точек до начала координат и напечатать, какая из точек расположена ближе к началу координат. (с повтором)
281
441
Ответы на вопрос:
Var x1,y1,x2,y2,x3,y3,r1,r2,r3: real; min,p: integer; begin repeat write('x1, y1: '); readln(x1,y1); write('x2, y2: '); readln(x2,y2); write('x3, y3: '); readln(x3,y3); r1: =sqrt(x1*x1+y1*y1); r2: =sqrt(x2*x2+y2*y2); r3: =sqrt(x3*x3+y3*y3); writeln('r1 = ',r1: 5: 2,' r2 = ',r2: 5: 2,' r3 = ',r3: 5: 2); if r1< r2 then min: =1 else min: =2; if r3< min then min: =3; writeln('к началу координат ближе точка № ',min); write('хотите повторить? (1-да, 0-нет) '); readln(p); until p< > 1; end. пример: x1, y1: 3 -2 x2, y2: -4 1 x3, y3: 5 0 r1 = 3.61 r2 = 4.12 r3 = 5.00 к началу координат ближе точка № 1 хотите повторить? (1-да, 0-нет) 1 x1, y1: 8 0 x2, y2: -3 4 x3, y3: 5 -2 r1 = 8.00 r2 = 5.00 r3 = 5.39 к началу координат ближе точка № 2 хотите повторить? (1-да, 0-нет) 0
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
andrey45513.02.2021 13:40
-
kseniyvolcova23.04.2023 04:09
-
mikreaz28.10.2021 15:40
-
тигренок5555517.08.2021 04:09
-
balabonkin68p06p8r29.10.2022 01:01
-
зубрильчик16.01.2021 13:56
-
pva199203.07.2020 01:06
-
iliacska26.01.2023 19:11
-
Ferdgi04.12.2021 08:53
-
кабанерий10.09.2020 05:03
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.