Найти в массиве квадратные корни наиболее удаленные друг от друга

[sher_man]

ВОбщем задача звучит так:
В массиве вещественных чисел найти тройки элементов, при рассмотрении которых в качестве коэфициентов квадратного трёхчлена можно получить наиболее удалённые друг от друга корни.
вот мои примерные наброски, помогите составить алгоритм = ))))
Дано
a*x^2 + b*x + c = 0

Дискриминант
D = b^2 - 4*a*c

Корни
x1 = (-b-корень(D))/(2*a);
x2 = (-b+корень(D))/(2*a);

Растояние
r=|x1-x2|
подставим x1 и x2
r=|-корень(D)/a| или корень(D)/|a|
Т.О.
Нужно найти такие три числа
чтобы D>0 и корень(D)/|a| был максимальным

на будущее: Темы нужно называть адекватно.

[Stilet]

Думается тут нужно два цикла, один в другом перебрать элементы массива, посчитать корни и найти среди их разницы максимум.

[sher_man]

дык я понимаю что нужны цыклы... вот если бы вы мне показали как примерно выгледила бы программа, моя благодарность не знала бы границ = ))))

И есчо одна весч = ))) посаветуйте какую лучше литературу почитать новечку )) и где её можно найти по Delphi... а то все что я нахожу написанно на какомто космическом языке.