FOR-Schleifen-Start während Durchlauf +1 zählen

[uwewo]

Auch noch ein Vorschlag

Delphi-Quellcode:

For i := 1 to 50 do
  begin
    if not odd(i) then continue;
  end;