1.даны координаты трёх вершин треугольника(x1,,,y3).найти его площадь,используя формулу для расстояния между двумя точками на плоскости. , надо,успеть до 23.00(

dina53646 dina53646    3   18.05.2019 09:20    1

Ответы
NASTYASIDorova10 NASTYASIDorova10  11.06.2020 15:39

Пишите язык, что ли. Хотите получить рано или поздно программу на brainfuck-e?

Я напишу на Паскале.

 

function dist(x1,y1,x2,y2: real): real;

begin

   dist := sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2));

end;

var x1,x2,x3,y1,y2,y3,a,b,c,s:real;

begin

   readln(x1,y1,x2,y2,x3,y3);

   a:=dist(x1,y1,x2,y2);

   b:=dist(x1,y1,x3,y3);

   c:=dist(x2,y2,x3,y3);

   s:=(a+b+c)/2;

   s:=sqrt(s*(s-a)*(s-b)*(s-c));

   writeln(s)

end.

 

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика