While schleife endlos? oder nicht?

[Chemiker]

Hallo JumpFrog,

normalerweise sind die Lottozahlen bei dem Lotto, beidem ich mitspiele immer verschieden.

Delphi-Quellcode:

while c<=5 do
  begin
    while Feld[a]= LoZahl do
      LoZahl:=random(48)+1;
    c:=c+1;
  end;

Diese beiden Schleifen werden doch nur einmal durchlaufen und anschließend steht c auf 6.

Bis bald Chemiker