kann mir jemand in paar tage das wichitge mit delphi beibrin

[Feuerwehrmann90]

Delphi-Quellcode:

var zahl,i,ausgabe:integer;
begin
 zahl:=230;
  ausgabe:=0;
 for i:=1 to 230 do
 begin
 ausgabe:= ausgabe + i;
 ShowMessage('Die aktuelle Zahl ist' + InttoStr(ausgabe));
 end;
 end;
end.

do das kann ich guckst du