Question

Найти площадь треугольника с помощью Pascal.

Answer 1

Program Trykutnyk;
uses Crt;
const a=5; b=3.6; c=4.2;
var p,s: real;
begin
          clrscr;
          p:=a+b+c;
          writeln('p=',  p:5:2);
          p:=p/2;
          s"=sqrt(p*(p-a)*(p-b)*(p-c));
          writeln('s=',  s:5:2);
          writeln('Имя Фамилия');
          readln
end.

Answer 2

Чтобы найти площадь треугольника с помощью метода Паскаля, предположим, что у нас есть координаты вершин треугольника: A(x1, y1), B(x2, y2) и C(x3, y3). Тогда площадь треугольника можно найти по следующей формуле:

Площадь = |(x1(y2 - y3) + x2(y3 - y1) + x3(y1 - y2)) / 2|

Знак "| |" означает взятие абсолютного значения. Если значение в знаке модуля отрицательное, следует его изменить на положительное.

После того, как вы найдете значение данного выражения, вы получите площадь треугольника. Примечание: выражение будет давать правильный результат только если вершины треугольника заданы в порядке обхода по часовой стрелке или против часовой стрелки.