Ответы на вопрос:
// pascalabc.net 3.2, сборка 1439 от 09.05.2017 // внимание! если программа не работает, обновите версию! type point=(real,real); function readpoint(n: integer): point; begin var a,b: real; write('координаты точки ',n,': '); read(a,b); result: =(a,b) end; function getpoints(n: integer): array of point; begin result: =new point[n]; for var i: =0 to n-1 do result[i]: =readpoint(i+1) end; function lsqr(a,b: point): =sqr(b[0]-a[0])+sqr(b[1]-a[1]); function diags(a: array of point; n: integer): array of real; begin result: =new real[n*(n-3) div 2]; var k: =0; for var i: =0 to n-3 do for var j: =i+2 to min(n+i-2,n-1) do begin result[k]: =lsqr(a[i],a[j]); k+=1 end; end; begin var n: =readinteger('количество вершин: '); if n> 3 then begin var a: =getpoints(n); writeln('длина наибольшей диагонали равна ',sqrt(diags(a,n).max): 0: 5) end else writeln('диагонали отсутствуют') end. пример количество вершин: 5 координаты точки 1: -3 2.5 координаты точки 2: 3 5.2 координаты точки 3: 6.1 1 координаты точки 4: 2 -7.3 координаты точки 5: -5 -7 длина наибольшей диагонали равна 14.58904
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Вика25041124.12.2021 23:56
-
greatdannil21.05.2020 03:26
-
Vil6730.05.2023 02:19
-
ts250484p0bsmh02.09.2022 05:25
-
angelinafeodoro08.04.2021 07:09
-
AgentDaleCoop03.07.2022 20:12
-
Bisspector01.05.2021 17:43
-
po4emy22803.12.2020 20:40
-
justnastasyaaa30.06.2022 07:33
-
GGWPmen03.12.2021 17:01
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.