Thema
:
Delphi
2 hoch 3 hoch 4 u.s.w .
Einzelnen Beitrag anzeigen
boxer123
Registriert seit: 18. Okt 2011
96 Beiträge
#
18
AW: 2 hoch 3 hoch 4 u.s.w .
1. Nov 2011, 19:45
markieren
Delphi-Quellcode:
procedure
TForm1.Button1Click(Sender: TObject);
var
basis,exponent,result,i:integer;
begin
Result := 1;
for
i := 1
to
Exponent
do
Result := result * basis;
//
edit3.text:=inttostr(result);
aber ich weiß nicht
Zitat
boxer123
Öffentliches Profil ansehen
Mehr Beiträge von boxer123 finden