Найти непересекающиеся окружности Опции

[Carrera]

Я вообще не понимаю в програмировании.Никогда не было информатики а тут надо одну задачу решить и зачет.Рещите пожалуйста кто умеет .Нужно в турбо паскале.Буду оч благодарна(шоколадку обеспечу))


Окружность на плоскости задана координатами X,Y,R-радиус(все значения формируются случайным образом).Из 20-ти окружностей показать те,которые не пересекают другие.

[IUnknown]

Андрей, одна окружность лежащая внутри другой, но не касающаяся и не пересекающая её, наверное, тоже должна считаться непересекающейся ни с чем?

Я про вот такой случай:

const
  n = 4;
  c: array[1..n] of record
    x,y,r: double
  end =
  (
    (x:3; y:3; r:1),
    (x:7; y:2; r:1),
    (x:8; y:5; r:1), // <-- Лежит внутри №4
    (x:8; y:5; r:3)
  );