Три точки заданы своими координатами. определите, можно ли построить треугольник с вершинами в этих точках. составьте программу в pascal, !

214

457

Посмотреть ответы 2

Ответы на вопрос:

juliagulevich7юля

Информатика

4,6(30 оценок)

//pascal abc.net v3.0 сборка 1111 var x1,y1,x2,y2,x3,y3: integer; a1,a2,a3: real; begin read(x1,y1,x2,y2,x3,y3); a1: =sqrt(sqr(x1)+sqr(y1)); a2: =sqrt(sqr(x2)+sqr(y2)); a3: =sqrt(sqr(x3)+sqr(y3)); if (a1< (a2+a3)) and (a2< (a1+a3)) and (a3< (a2+a1)) then writeln('yes') else writeln('no'); end.пример ввода: 123456пример вывода: no