i:=i+1; und j:=i+1; gehört an das Ende der jeweiligen Repeatschleifen, da sonst der 1. Durchlauf übersprungen würde.
Delphi-Quellcode:
I := 1;
repeat
J := I + 1;
repeat
...
J := J + 1;
until J = 5;
I := I + 1;
until I = 4;
Wobei die eigentliche Entsprechung einer FOR-Schleife eine While-Schleife wäre, da am Anfang geprüft wird.
Delphi-Quellcode:
I := 1;
while I <= 4 do begin
J := I + 1;
while I <= 5 do begin
...
J := J + 1;
end;
I := I + 1;
end;
@xxsasch4xx: Bitte stell deine QuellCodes in entsprechende Code-Tags (für Delphi = [delphi]...[
/delphi]).
Deine Posts kannst du noch 24 Stunden lang editieren und dieses ändern.