Если считать, что координаты вершин даны последовательно, то диагоналями являются прямые AC и BD. Формула для нахождения длины прямой, заданной координатами её концов, известна:
var xa,ya,xb,yb,xc,yc,xd,yd:real; begin Write('Введите координаты точки А: '); Read(xa,ya); Write('Введите координаты точки B: '); Read(xb,yb); Write('Введите координаты точки C: '); Read(xc,yc); Write('Введите координаты точки D: '); Read(xd,yd); Writeln('Длина диагонали AC равна ',sqrt(sqr(xc-xa)+sqr(yc-ya))); Writeln('Длина диагонали BD равна ',sqrt(sqr(xd-xb)+sqr(yd-yb))) end.
Пример Введите координаты точки А: -8.5 -2 Введите координаты точки B: -5 3.15 Введите координаты точки C: 1.2 5.8 Введите координаты точки D: 11 -4 Длина диагонали AC равна 12.4470880128647 Длина диагонали BD равна 17.524910841428
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
