For-do Schleife mit Sprung

[himitsu]

Ein Hallöle von http://www.FrankNStein.de/Smiley-Wolke.gif,

Code:

[b]For[/b] I := 1 [b]to[/b] (ZAHL - 1) [b]div[/b] 2 [b]do Begin[/b]
  [color=red]TestZahl[/color] := (I * 2) + 1;
  ...
[b]End[/b];

Da ja auch nur bis Zahl / 2 geprüft werden braucht:

Code:

[b]For[/b] I := 1 [b]to[/b] ZAHL [b]div[/b] 4 [b]do Begin[/b]
  [color=red]TestZahl[/color] := (I * 2) + 1;
  ...
[b]End[/b];

http://www.FrankNStein.de/Smiley-Kuss.gif * * http://www.FrankNStein.de/Smiley-Spinne.gif * * * http://www.FrankNStein.de/Smiley-Winken.gif