как узнать пересекаются 2 окружности или нет

[fate]

есть 2 окружности, известны центры окружностей и их радиус, как узнать пересекаются они или нет?
понятно что две окружности пересекаются, если расстояние между их центрами меньше суммы их радиусов.
есть массив окружностей, прохожусь по ним циклом, в цикле поставил условие
if ((p[i].r+r>=abs(p[i].p.X-t.X))and(p[i].r+r>=abs(p[i].p.y-t.y))) then
как-то не корректно работает.
На форме видно что они не пересекаются а условие говорит что пересекаются
Где:
p[i].r - радиус очередной окружности из массива
r - радиус окружности какую мы проверяем на пересечение с ней других окружностей
p[i].p.X - центр по х очередной окружности из массива
t.X - центр по х окружности какую мы проверяем на пересечение с ней других окружностей
p[i].p.y - аналогично p[i].p.X
t.y - аналогично t.X

[Serge_Bliznykov]

Э!! Так Вы же расстояние неправильно вычисляете!

Расстояние между двумя точками - это корень квадратный из суммы квадратов разности соответствующих координат.

Пусть есть точка A с координатами (Xa, Ya) и точка B с с координатами (Xb, Yb)
тогда расстояние Lab между ними будет:

Lab := sqrt( sqr(Xa-Xb) + sqr(Ya-Yb) );

[fate]

аааа точно, я ж делал такое.
Счас исправлю

вооо, совсем другое дело