Цитата:
@_is_absent:
code:Count:=Round(Abs(b-a)/eps);
for i:=1 to Count do
begin
Result:=Result + (Abs(b-a) + Abs(Min(Func(a+Count*eps), Func(a+Count*eps+eps))))*eps;
end;
|
А нельзя чтоб там слово "repeat" присутствовало?
А то фиг её знает....может и не понять