While schleife endlos? oder nicht?

[_frank_]

Zitat von JumpFrog:

Ich weiß nicht wieso weil es eigentlich beim ersten durchlaufen der schleife eine endlosschleife ergeben müsste.

Delphi-Quellcode:

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

deine Einrückung ist falsch wenn du sie richtig machst, wird der fehler klarer:

Delphi-Quellcode:

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

wie du siehst, bleiben beide Seiten der Bedingung gleich (also ungleich ), der index des arrays wird erst nach verlassen der while-schleife gesetzt.

HTH Frank