Решение уравнения

[Datrav]

Дело вот в чем.Все решали когда-то уравнения вида ax^2+bx+c=0. Так вот я загорелся идеей сделать программу нахождения корней уравнения по введенным коэфициентам.Все кажется простым. Но я хочу сделать программу так,чтобы она выдавала ответ,если он не целый,именно дробью,а не уже посчитанным конечным числом. У меня есть идея по решению, но что можете предложить вы?

[Stilet]

Что значит дробью? 2,256 дробью показать? Так это просто накидай Лабелей, разграфить линиями и получиш а-ля дробь.

[puporev]

А если корень из дискриминанты не целое число, как писать будешь? Например 3^0.5.
А просто дробью записать не проблема.
p1:=-b+sqrt(D);
q1:=2*a;
Находим НОД, сокращаем числитель и знаменатель и пишем
Writeln('x1=',p1,'/',q1);
Я так думаю до Вас не одна тыща школьников и студентов это делали.