Hochzahl ?

[Clane]

also ich möchte eine hochzahl ein einen rechner einabuen der z.b mit den werten a und x die formel erstellt wenn x gleich 4 ist ...

a*a*a*a aber das is mir so zu umständlich gibts da einen befehl wie + - * / für ??

MfG. PBiggi

[Oxmyx]

Sechzehn := Power(2, 4);

[Neotracer64]

Delphi-Quellcode:

uses Math;

var
x,a: Integer;
begin
x:=2;
a:=4;
Power(x,a);
end;

[Clane]

danke für euren schnellen antworten

[Clane]

wäre die formel so dann richig .. ich mein die exponential funktion y = b*a(hoch)x

Edit1 := b * a * Power(x,a);

[glkgereon]

Delphi-Quellcode:

FloatToStr();
//daher
Edit1 := FloatToStr(b * a * Power(x,a));

warum noch a mal?

[Clane]

dangöö

[dizzy]

Power(x, a) ist x^a. a^x wäre Power(a, x).

[marabu]

Hallo PBiggi,

solange du wieder mal deine Math-Unit suchst kannst du das hier benutzen:

Delphi-Quellcode:

function Power(base: integer; exponent: byte): Int64;
begin
  if exponent = 0 then Result := 1
  else begin
    Result := Power(base, exponent shr 1);
    Result := Result * Result;
    if Odd(exponent) then
      Result := Result * base;
  end;
end;

Freundliche Grüße vom marabu

[Dax]

Warum nicht einfach so?

Delphi-Quellcode:

function MyPow(Base, Exponent: Integer): Int64;
begin
  Result := Round(Exp(Exponent * Ln(Base)));
end;