Найти расстояние между двумя точками с заданными координатами (x1, y1) и (x2, y2).

Найти расстояние между двумя точками с заданными координатами (x1, y1) и (x2, y2).
Гость
Ответ(ы) на вопрос:
Гость
var x1,x2,y1,y2,s:real; begin write('Введите значение x1=');read(x1); write('Введите значение y1=');read(y1); write('Введите значение x2=');read(x2); write('Введите значение y2=');read(y2); s:=sqrt(sqr(x2-x1)+sqr(y2-y1)); writeln('Расстояние=',s:5:2); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы