Einzelnen Beitrag anzeigen

Benutzerbild von glkgereon
glkgereon

Registriert seit: 16. Mär 2004
2.287 Beiträge
 
#3

Re: potenzieren mit kommazahlen

  Alt 28. Sep 2004, 16:12
nein, es ging mir nicht um eine funktion, sondern wie es gerechnet wird, wobei du recht hast, das könnte ich da ma nachgucken...

Delphi-Quellcode:
function Power(const Base, Exponent: Extended): Extended;
begin
  if Exponent = 0.0 then
    Result := 1.0 { n**0 = 1 }
  else if (Base = 0.0) and (Exponent > 0.0) then
    Result := 0.0 { 0**n = 0, n > 0 }
  else if (Frac(Exponent) = 0.0) and (Abs(Exponent) <= MaxInt) then
    Result := IntPower(Base, Integer(Trunc(Exponent)))
  else
    Result := Exp(Exponent * Ln(Base))
end;
die ausnahmen:
1) n hoch 0 = 1
2) 0 hoch n = 0
3) ????????????

und dann, wo is exp deklariert?

also, ausnahme 3: wenn der nachkommateil vom exponenten null ist und exponent im bereich von longint liegt dann machs mit intpower....und das is asm...kein plan von

und exp:

In Delphi gibt Exp e hoch X zurück, wobei e die Basis des natürlichen Logarithmus ist.

was bitte?
»Unlösbare Probleme sind in der Regel schwierig...«
  Mit Zitat antworten Zitat