so habs ja geändert wir müssen die while schleife benutzen und ich hab das jetzt so gelöst:
Delphi-Quellcode:
while Ergebnis<Endbedingung do begin
Zaehler := Zaehler+1 ;
Ergebnis :=Ergebnis+(Eingabe/1/Zaehler) ;
mem1.Lines.Add(FloattoStr(Zaehler) +' '+ Floattostr(Ergebnis));
aber wenn ich für Endbedingung 10e2 eingebe gibt das ne riesen schleife und ich soll das aber so wegen schule machen aber vielleicht hat ja auch mein lehrer nen fehler gemacht aber jetzt geht das im prinzip schonma was heißt denn 10e2 wenn das 1000 heißt dann hat unser lehrer nen fehler gemacht
danke ihr könntet mir vielleict noch sagen ob 10e2 virklich 1000 heißt ansonnste danke