Zitat von
RavenIV:
Aber die Vorgabe ist, dass er es mit einer for-Schleife machen muss.
Wo ist denn die For-Schleife hinverschwunden? (Auch wenn die Lösung phantastisch funktionieren sollte)
Zitat von
Matze89:
Delphi-Quellcode:
{ function Power(basis, Exponent: Extended):Extended;
begin
power(basis,Exponent);
end;}
procedure TForm1.Button1Click(Sender: TObject);
var Basis,Exponent,Ergebnis : Integer;
begin
Basis:= StrToInt(Edit1.Text);
Exponent:= StrToInt(Edit2.Text);
// Edit3.Text:= IntToStr(Power(basis, Exponent));
Edit3.Text := FloatToStr(Power(basis, exponent));
end;
So dürfte es dann gehen
Zitat von
Matze89:
zum beispiel hab ich die Basis 3 eingegeben, den Exponenten 2 und kam auf das Ergebniss von 169787972918927484
aber bei Basis 2 und Exponent 3 ging es irgendwie, da kamm ich auch auf 8
Schon mal die Schleife debuggt? Die Zahl sieht aus, als ob sie die Obergrenze von Int64 wäre.
Bernhard