Delphi. Помогите, будьте добры) Доброго времени суток. Имеется часть программулина, в которой решается уравнение. Дело в том, что уравнение само описано в листинге. Подскажите, как организовать чтобы переменная цепляла уравнение из Edit? Заранее спасибоtype func1 = function(x:extended): extended;PROCEDURE DIX(a,b,Eps,Eps1:extended; var x,r:extended; fu:func1); FUNCTION SIGN(x:extended):integer;var Form1: TForm1;implementation{$R *.dfm}var aa,bb,fa,fb,eps,eps2,xx,rr: extended; xmin, xmax, ymin, ymax: Integer;function ff(x:extended):extended;begin ff:= 10*x*x*x - 25*x*x + 15*x -1;end;