Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Wurzel ziehen (https://www.delphipraxis.net/52369-wurzel-ziehen.html)

r2c2 29. Aug 2005 10:25

Re: Wurzel ziehen
 
Zitat:

Zitat von BlackJack
ich wollte nur mal anmerken dass die Sqrt-funktion in der Unit System enthalten ist, die automatisch eingebunden wird, von daher sollte man an der uses-Liste eigentlich nichts ändern mussen... :gruebel:

Huch... *schnell mal nachguck* Hm... Du hast Recht! Was war denn dann das Problem? :gruebel:

mfg

Christian

DevilsCamp 29. Aug 2005 13:36

Re: Wurzel ziehen
 
Man kann aber auch mithilfe der Math-Unit und der Power-Funktion Wurzeln ziehen (hier sogar beliebige ;) )

Delphi-Quellcode:
procedure Test;
var
  qw : Extended;
  cw : Extended;
  bw : Extended;
begin
// Quadrat-Wurzel von a:
  qw := Power(a, 0.5);

// Kubikwurzel von a:
  cw := Power(a, 1.0/3);

// Wurzel aus a*a*a:
  bw := Power(a, 3.0/2);
end;

BlackJack 29. Aug 2005 14:02

Re: Wurzel ziehen
 
das kann man zur Not auch ohne die Math-Unit mit Ln und Exp ;)


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:45 Uhr.
Seite 2 von 2     12   

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