Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi abweichung (https://www.delphipraxis.net/79010-abweichung.html)

fLaSh11 14. Okt 2006 18:17


abweichung
 
Hallo DPler,
heute hab ich warscheinlich eine einfache Frage, aber die Suche gab nichts her (vllt hab ich auch nach den falschen Stichwörtern gesucht...).
Und zwar: Wie kann ich sagen:

Wenn a nicht mehr als 1/100 von b abweicht, dann...

Also das einfache wäre die if-Schleife hierdrin. Nur gibt es eine Funktion, mit der man zwei Variablen mit bestimmter Toleranz vergleichen kann?

Bei sehr kleinen Toleranzen (z.B. 1/10) wäre das ganze ja noch mit einer for-Schleife realisierbar, aber bei meinem Programm wollte der PC 6*10^(-18 ) einfach ncht als Null erkennen -.-

Vielen Dank für die Antworten schonmal.

hanselmansel 14. Okt 2006 18:21

Re: abweichung
 
Delphi-Quellcode:
If Abs(a-b) < a/100 then
  DoSomethingUseful;
MfG,

hanselmansel

fLaSh11 14. Okt 2006 18:24

Re: abweichung
 
stimmt, warum bin ich nicht gleich auf betrag gekommen? ^^ danke


Alle Zeitangaben in WEZ +1. Es ist jetzt 15:31 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz