![]() |
Re: Potenz einer Zahl
Zitat:
|
Re: Potenz einer Zahl
Zitat:
Ist doch schon ne Weile her, dass ich effektiv mit Rekursion gearbeitet habe. |
Re: Potenz einer Zahl
Und was ist, wenn man 5^(-1/2) berechnen soll? Das geht doch mit keiner Schleife, oder?
|
Re: Potenz einer Zahl
Doch, geht genauso!
Bei Gleitkommazahlen als Exponenten wirds mit der Methode schwierig. Nutze hier Power. Mit Negativen ist es auch einfach. Zu Beginn deiner Potenzier-Funktion den Kehrwert der Basis bilden und dann normal weiterrechnen. |
Re: Potenz einer Zahl
Zitat:
x^(1/2) wäre ja Wurzel(x). aber x^(-1/2)? Also der Windows-Taschenrechner (in wissenschaftlicher Ansicht) akzeptiert das nicht. |
Re: Potenz einer Zahl
Zitat:
|
Re: Potenz einer Zahl
Zitat:
... oder ist das ein Vista-Feature :mrgreen: ? |
Re: Potenz einer Zahl
x^k = exp(k*ln(x))
Und nun ratet mal, was die Funktion Power() macht. Für ganzzahlige Exponenten, positive und negative, gibts eine sehr hübsche kleine handassemblierte Funktion. Die ist, sinnigerweise, iterativ. |
Re: Potenz einer Zahl
Ist zwar alles schön und gut aber er hat die Hausaufgabe das mit einer Schleife zu lösen.
Dass kann man natürlich mit Power etc machen, ist aber nicht Sinn der Übung. Wie gasagt, selbst nachdenken oder bei Neutral General spicken^^ |
Re: Potenz einer Zahl
[ function Potenz(Basis, Exponent: Integer): Int64;
begin if Exponent = 0 then Exit else Result := Basis * Potenz(Basis, Exponent - 1); end; procedure TForm1.Button1Click(Sender: TObject); var Basis,Exponent,Ergebnis : Integer; begin Basis:= StrToInt(Edit1.Text); Exponent:= StrToInt(Edit2.Text); Ergebnis:= IntToStr(Potenz); end; end. ] kann mir aml jem. sagen, was hier falsch ist? ich möchte, das ich eine Zahl eingebeben, und dann will ich die Potenz berechnen. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:16 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 by Thomas Breitkreuz