[Юрис 2009]

Даны две точки А(х1,у1) и В(х2,у2). Составить алгоритм, определяющий, которая из точек находится ближе к началу координат.

[ApxaHGe1]

Если точки ты задаешь сам в ручную, IF сойдет ... для сравнения точек

[Nyctos Kasignete]

Код:

1 2 3 4 5 6 7 8 9

var   Dist1, Dist2: Double;   x1, x2, y1, y2: Double; begin   Dist1 := Sqrt(x1 * x1 + y1 * y1);   Dist2 := Sqrt(x2 * x2 + y2 * y2);   if Dist1 < Dist2 then ShowMessage('Точка A ближе к началу координат!')   else ShowMessage('Точка B ближе к началу координат!'); end;

[Sphinx]

И вот зачем такому балбесу помогать? на таких зарабатывать надо =)

У человека и так видно желания программировать нет, так и вы еще хуже делаете.

[Страдалецъ]

И вот зачем такому балбесу помогать? на таких зарабатывать надо =)

У человека и так видно желания программировать нет, так и вы еще хуже делаете.

А вы девиз этого раздела причитали?