Repeat-Until Schleife X^n

[Sir Rufo]

Damit wollte ich auch nicht sagen, dass du das können mußt, aber erkennen, dass der Ansatz schon falsch ist, das müsstest du.

Zitat:

Delphi-Quellcode:

x:=m
repeat
m:= m*x
x:=x+1
until x >= Ende

Ist dort ein fehler?

1. verwende die Variablen in der gleichen Bedeutung der Formel (sonst gibt es nur Verwirrung)
function Hoch( x, n : integer ) : integer; 2. Wenn wir wissen, das x^n bedeutet, dass x mit sich selber multipliziert wird (Annahme n=3), dann würde das ja wie folgt errechnet:

Code:

0   1   2   3
1 * x * x * x

da sehe ich kein n in der Berechnung, und auch immer das gleiche x
Somit ergibt sich (hier mit einer for Schleife) folgender Code (bei n >= 0)

Delphi-Quellcode:

var
  nidx : integer;
begin
  Result := 1;
  for nidx := 1 to n do
    Result := Result * x;
end;