Предмет: Информатика,
автор: lianazairullina
известны координаты точек треугольника по этим данным нужно найти площадь треугольника паскаль
Ответы
Автор ответа:
0
// PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (Ax, Ay) := ReadReal2('Координаты x и y точки А:');
var (Bx, By) := ReadReal2('Координаты x и y точки B:');
var (Cx, Cy) := ReadReal2('Координаты x и y точки C:');
var S := 0.5 * Abs((Ax - Cx) * (By - Cy) - (Bx - Cx) * (Ay - Cy));
Println('Площадь треугольника равна', S)
end.
Похожие вопросы
Предмет: География,
автор: Galaxychaos
Предмет: Алгебра,
автор: mentukh2009
Предмет: Биология,
автор: Daki1
Предмет: Литература,
автор: stolyarenckotanya