Ну и что это за бред такой:
Код:
while j<b do
begin
maxN := fpp(j);
if max<maxN then begin max:=maxN;
maxJ:=j;
end;
j:=j+E;
end;
?. Вы оцениваете производные по каким-то там целочисленным точкам, ибо Вам заблагорассудилось именно по сим точкам оценить. И плявать Вам, что бессмысленно это, ибо в стандартной оценке погрешности стоит максимум той самой производной по
всем возможным значениям. Который (максимум) есть бесконечность.
------------------------------------------------
Прежде чем применять какую формулу, которая стоит в каком замечательном учебнике, небесполезно подумать -- а имеет ли эта замечательная формула хоть какое отношение к данной конкретной ситуации.
(кстати, в добросовестных учебниках границы применимости обычно добросовестно оговариваются)