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