Mach dir doch mal schöne Variablennamen:
statt "a" schreibst du "abfangskapital", "z" wird zu "zins" und "I" wird zu "dauer", "e" wird zu "endkapital" usw.
Und dann schau mal genau hin:
Delphi-Quellcode:
FOR n:=1 TO dauer DO
BEGIN
endkapital:=anfangskapital*zins/100+anfangskpital;
Memo2.Lines.Add(FloatTOStr(endkapital));
END;
Siehst du, dass sich so das Endkapital nie aufsummieren kann?