Einzelnen Beitrag anzeigen

gammatester

Registriert seit: 6. Dez 2005
999 Beiträge
 
#7

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

  Alt 12. Jul 2013, 08:31
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;
Wie soll da irgendetwas sinnvoll funktionieren? Änderungen in der Schleife können nur über den geheimnisvollen globalen Parameter X erfolgen, aber die Fehlerabschätzung kann nicht in die nächste Iteration eingehen, da Error lokal ist und nicht an Rechne übergeben wird!

Neben schlechtem Design scheint mir auch die Logik löchrig zu sein. Normalweise ändert man X innnerhalb der Schleife abhängig von Error (und eventuellen Nebenbedingungen).
  Mit Zitat antworten Zitat