For Schleife

[bigdaddy76]

Hallo zusammen,

ich habe ein kleines problem bzw. ein denkfehler vielleicht könnt ihr mir helfen.

ich möchte über einen button die fakultät errechnen habe aber ein fehler und ich komme nicht drauf.

Delphi-Quellcode:

procedure TForm1.Button8Click(Sender: TObject);
var i:integer;
begin
zahl1:= strtoint(edit1.text);
for i:= 0 to zahl1 do  ergebnis
edit3.Text:= inttostr(eregbnis);
end;

end.

vielleicht könnt ihr mir helfen!

gruß
bigdaddy

[ibp]

herzlich willkommen bei dp

Delphi-Quellcode:

procedure TForm1.Button8Click(Sender: TObject);
var i:integer;
begin
zahl1:= strtoint(edit1.text);
ergebnis:=1;
for i:= 2 to zahl1 do  
  ergebnis:=ergebnis*i;

edit3.Text:= inttostr(eregbnis);
end;

end.

..den ersten gibts gratis

[bigdaddy76]

das ist aber sehr nett, dass es umsonst ist....
was kostet denn wenn man mehr hilfe braucht?

[tomsel]

Zitat von bigdaddy76:

das ist aber sehr nett, dass es umsonst ist....
was kostet denn wenn man mehr hilfe braucht?

Na, umsonst wird es hoffentlich nicht sein

[ibp]

Zitat von bigdaddy76:

das ist aber sehr nett, dass es umsonst ist....
was kostet denn wenn man mehr hilfe braucht?

demnächst hirnschmalz!