Update unit1.pas

исправлены ошибки
	
66 строка     val(edit2.text,b,code);
68 строка     val(edit3.text,eps,code);
74 строка     if f(a)*f(x)<0 then b:=x
91 строка перед  end вставить   i:=i+0.01;
96 строка     memo1.lines.add('x='+Ta);