Bei jedem nächsten Aufruf der Funktion ist Result schon wieder vergessen. Du musst den alten Wert mit übergeben. Ausserdem, was wäre Result = Result + ... beim ersten Aufruf
Beim ersten Aufruf musst Du halt
0 übergeben.
[quote="Schwabe"]
Delphi-Quellcode:
function f(x, LastValue: extended): extended;
begin
result:= LastValue + StrToFloat(z)*Power(x,StrToFloat(hz));
end;
...
...