Даны две точки в плоской прямоугольной системе координат. Составить программу в паскале для определения, которая из точек находится ближе к началу координат.(СРОЧНО. ЗАРАНЕЕ СПАСИБО)

Даны две точки в плоской прямоугольной системе координат. Составить программу в паскале для определения, которая из точек находится ближе к началу координат.(СРОЧНО. ЗАРАНЕЕ СПАСИБО)
Гость
Ответ(ы) на вопрос:
Гость
var   x, y, d : real; begin   read (x, y);   d := sqr (x) + sqr (y);   read (x, y);   if d > sqr (x) + sqr (y) then write ('Вторая ближе') else write ('Первая ближе'); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы