Известны координаты вершин a, b, c треугольника. напишите программу, вычисляющую площадь этого треугольника. пример входных данных: ха=2 ya=1 xb=6 yb=5 xc=10 yc=1 пример выходных данных: s=16.0 )

Program triangle;

var ax,bx,cx,ay,by,cy:integer;

begin

 Writeln('Введите координату А по Х');

 Readln(ax);

 Writeln('Введите координату B по Х');

 Readln(bx);

 Writeln('Введите координату C по Х');

 Readln(cx);

 Writeln('Введите координату А по Y');

 Readln(ay);

 Writeln('Введите координату B по Y');

 Readln(by);

 Writeln('Введите координату C по Y');

 Readln(cy);

 Writeln('Площадь треугольника равна ', 0.5*((ax-cx)*(by-cy)-(bx-cx)*(ay-cy)));

end.

Подробнее - на -

Объяснение: