Wie mathematisch einer gewünschten Lösung nähern?

[Cyberstorm]

Hallo zusammen,

ich habe einen Algorithmus der mir etwas ausrechnet. Der nötige Input für den Algorithmus damit der gewünschte output herauskommt ist unbekannt.
Ich kann nur das Ergebnis bewerten.

Ich bin mir unsicher, wie ich am effektivsten die Zahl X verändere um mich möglichst schnell meinem Ziel zu nähern

Delphi-Quellcode:

function GetOffset(Input, Offset: Extended; Tolerance: Extended = 1) : Single;
var
  Error: Extended;
begin
  Error:=999;

  while Error > Tolerance do
    begin      
      Result:=Rechne(Input, X); 
      Error:=Abs(Result - Input - Offset);
    end;
end;

Danke & Grüße