Zitat von
Joe_the_Junkie:
Jetzt bräuchte ich aber noch die zweite Ableitung und soweit ich weiß, gibbet da keine Formel für.
Wüsste vielleicht einer von euch eine Lösung?
Delphi-Quellcode:
function f(x: Extended): Extended;
{ ... deine Funktion eben ... }
function fDerivation(x: Extended; grade: Integer);
begin
if grade = 0 then
Result := f(x)
else
Result := (fDerivation(x + Epsilon, grade - 1) - fDerivation(x, grade - 1)) / Epsilon;
end;