Заданы координаты трех вершин треугольника (х1,у1), (х2,у2), (х3,у3) . найдите его...

0 голосов
155 просмотров

Заданы координаты трех вершин треугольника (х1,у1), (х2,у2), (х3,у3) . найдите его периметр и площадь. нужно написать в паскале


Информатика (12 баллов) | 155 просмотров
Дан 1 ответ
0 голосов

Program q2; var x1,x2,x3,y1,y2,y3,a,b,c,P,S: real; begin readln(x1); readln(x2); readln(x3); readln(y1); readln(y2); readln(y3); a=sqrt((x2-x1)*(x2-x1)+(y2-y1)*(y2-y1)); b=sqrt((x3-x2)*(x3-x2)+(y3-y2)*(y3-y2)); c=sqrt((x1-x3)*(x1-x3)+(y1-y3)*(y1-y3)); P=a+b+c; S=sqrt((0,5*P)*(0,5*P-a)*(0,5*P-b)*(0,5*P-c)); writeln(P); writeln(S); end.

(149k баллов)