Составить алгоритм и написать решение задачи на Паскале: Три точки заданы своими координатами. Найти длины сторон треугольника и его площадь.

Program n1; var: x1, y1, x2, y2, x3, y3, S, p, a, b, c: real; begin readln(x1,x2,x3,y1,y2,y3); a=sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2)); b=sqrt((x2-x3)*(x2-x3)+(y2-y3)*(y2-y3)); c=sqrt((x3-x1)*(x3-x1)+(y3-y1)*(y3-y1)); p=0.5*(a+b+c); S=sqrt(p*(p-a)*(p-b)*(p-c)); writeln(S); writeln(a,' ',b,' ',c); end.