Составить алгоритм определения периметра треугольника, заданного координатами (х1; ; у2); (х3; у3) своих вершин. paskal

179

342

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

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

idjrglkuahregklha

Информатика

4,7(72 оценок)

Var x1,x2,x3,y1,y2,y3: integer; l1,l2,l3,p: real; begin writeln("введите координаты"); readln(x1,y1); readln(x2,y2); readln(x3,y3); l1: =sqrt(sqr(x1-x2)+sqr(y1-y2)); l2: =sqrt(sqr(x2-x3)+sqr(y2-y3)); l3: =sqrt(sqr(x3-x1)+sqr(y3-y1)); p: =(l1+l2+l3); writeln("периметр равен= ", p); end.