Entschuldigt bitte, wenn ähnliche Posts bereits tausendfach irgendwo gepostet wurden, allerdings konnte ich nirgendwo eine Lösung für mein Problem finden. Ich bin, was Lazarus/Delphi angeht, ein ziemlicher Neuling. In meinem Info-Kurs hatten wir die Aufgabe eine in einem Edit-Feld stehende Zahl mit einer weiteren in einem zweiten Edit-Feld stehenden Zahl zu potenzieren. Dabei sollten wir einmal eine for-, eine while- und eine repeat-until-Schleife verwenden. Das mit der For-Schleife hat soweit auch zufriedenstellend funktioniert. Ich weiß aber nicht wirklich, wie die anderen beiden funktionieren sollen (Ich habe wirklich verdammt lange überlegt und komme alleine nicht so wirklich weiter).
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
Var a:double; c: double; i: integer;
begin
a:=strtofloat(edit1.text);
c:=1;
for i:=1 to strtoint(edit2.text)do
begin
c:=c*a;
end;
edit3.text:=floattostr (c);
end;
Vielen Dank schon mal für eure Hilfe!
