While schleife endlos? oder nicht?

[JumpFrog]

nihms mir nicht übel....

aber...

Delphi-Quellcode:

while x<=5 do
begin
  If Feld[a]>=10 then
      zahl:=zahl+1;
  a:=a+1;
  x:=x+1
end;

Wenn das die While schleife ist

müsste hier

Delphi-Quellcode:

while x<=5 do
begin
  If Feld[a]>=10 then
      zahl:=zahl+1;
  a:=a+1;
end;
x:=x+1;

stehen damit es ausserhalb der schleife ist oder nicht?