5. Известны координаты вершин А, В, С треугольника. Разработайте и отладьте программу, вычисляющую площадь этого треугольника. Для проверки правильности программы используйте тест:
Входные данные:
xa=2
ya=1
xb=6
yb=5
xc=10
yc=1
Выходные данные
AB=16.0

Ответ
var
xa, ya, xb, yb, xc, yc: real;
s: real;
begin
xa := 2;
ya := 1;
xb := 6;
yb := 5;
xc := 10;
yc := 1;
s := abs((xa * (yb — yc) + xb * (yc — ya) + xc * (ya — yb)) / 2);
writeln(‘s = ‘, s:0:1);
end.
Результатом работы программы будет вывод значения площади треугольника s, которое равно 16.0.