Формула площади треугольника, вершины которого заданы своими координатами, известна:
var
x1,x2,x3,y1,y2,y3,s:real;
begin
Writeln('Введите x1,y1,x2,y2,x3,y3');
Readln(x1,y1,x2,y2,x3,y3);
s:=abs((x1-x3)*(y2-y3)-(x2-x3)*(y1-y3))/2;
Writeln('Площадь треугольника равна ',s:0:1)
end.
Результат решения:
Введите x1,y1,x2,y2,x3,y3
-12.57 -10.23 3.3 12.47 15.67 -10.32
Площадь треугольника равна 321.2