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

Program n1;var: x1, y1, x2, y2, x3, y3, S, p, a, b, c: real;beginreadln(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.