Entwickler-Ecke

Sonstiges (Delphi) - ganzzahlige Wurzel?

cerebrum - Sa 15.02.03 12:55
Titel: ganzzahlige Wurzel?

Hi!
Wie kann ich prüfen, ob die Wurzel aus einer Zahl ganzzahlig oder rational ist?

Christian S. - Sa 15.02.03 13:57

probier doch mal:

Quelltext

1:
2:

a:=sqrt(b);
if Trunc(a) = a then ShowMessage('Ganzzahlig!');

MfG,
Peter

DaRkFiRe - Sa 15.02.03 16:08

Man kann auch ...

Quelltext

1:
2:

a:=sqrt(b); 
if INT(a) = a then ShowMessage('Ganzzahlig!');

... schreiben :)

AndyB - Sa 15.02.03 18:28

... und spart sich somit ein paar Umwandlungen, die Rechenzeit in Anspruch nehmen. :idea:

Christian S. - Sa 15.02.03 18:31

Beide Funktionen beanspruchen Rechenzeit. Und welche davon schneller ist, ist noch gar nicht gesagt. Allerdings beinhaltet Int eine Rundungsfunktion, so dass hier evtl. sogar mehr Rechenzeit in Anspruch genommen wird. Aber mal ehrlich: meinst Du wirklich, dass der Unterschied bei heutigen Rechnern irgendwie von Bedeutung ist? Wohl kaum, oder?

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!