Решение квадратных уравнений в Delphi: примеры и код