Предмет: Информатика, автор: Аноним

Известны координаты двух точек на плоскости. Составить программу вычисления расстояния между ними
РАСПИШИТЕ ПОЖАЛУЙСТА ПОЛНОСТЬЮ ​


BlackHole3003: я надеюсь программа должна быть не на паскале

Ответы

Автор ответа: BlackHole3003
0

program sr;

var xa, xb, ya, yb, otv: real;

begin

 writeln('введите координаты первой точки через пробел ');

 readln(xa, ya);

 writeln('введите координаты второй точки через пробел ');

 readln(xb, yb);

 otv := Abs(sqrt(sqr(xa-xb)+sqr(ya-yb)));

 writeln('расстояние между точками =', otv)

end.

Похожие вопросы
Предмет: Алгебра, автор: Аноним