Заданы координаты трех вершин треугольника - (x1,y1); (x2,y2); (x3,y3). Найдите его периметр и площадь.!!!!!!!!!
Program Нахождение площади и периметра треугольника;
var x1, y1, x2, y2, x3, y3, a, b, c, p, d1, d2, d3, P,p, S: real;
Begin
readln (x1, y1, x2, y2, x3, y3);