Probleme mit Funktionen

[dizzy]

Und wenn du wissen möchtest wie es deutlich schneller geht:

Delphi-Quellcode:

function TForm1.Pot(a: Real; b: Integer): Real;
begin
  result := exp(b*ln(a));
end;

Voraussetzung: a > 0
b darf hierbei sogar Real sein .

Gruss,
Fabian