Геометрия и Pascal

[eXpressionist]

Получаю массив координат из файла. Надо сделать цикл, который прогонит все варианты точек (по три штуки), проверив их на образование треугольника (функция есть), затем построит линии, и из их середин возведет перпендикуляры(тоже есть), причем в точке пересечения найдет точку (центр) и радиус (все процедуры и функции кроме цикла уже написал).
Еще желательно написать процедуру, которая найдет данные такой окружности, при построении которой разность точек внутри и вне окружности по абсолютной величине минимальна.
Заранее огромное спасибо!
З.Ы. Не прошу решать за меня задачу, просто подскажите цикл и базу для процедуры.

 

[acorn]

Вот тебе цикл:
for i:=1 to N-2 do
for j:=i+1 to N-1 do
for v:=j+1 to N do
{проверка}

Функцию самому нужно написать

 

[eXpressionist]

-close-