Object Pascal - Elöltesztelő ciklus: while do

Feltétel tesztelése a ciklus elején történik. Minden egyes ismétlés előtt leteszteli hogy teljesült-e a feltétel. Az első végrehajtás előtt is történik tesztelés, ezért ez a ciklus használata kitűnő olyan helyzetekben ahol megeshet hogy egyszer se kell végrehajtani a ciklust.

while do

Leírás

while condition do statement;

Használt kulcsszavak: do while

Bemenet

condition - Logikai érték Feltétel lehet akármilyen kifejezés
statement - Utasítások

Megjegyzés: Itt használható utasítások:
Megszakító utasítás Következő iteráció elindítása

Példaprogramok

Object Pascal

Elöltesztelő ciklus lehetséges használata:

i:=0;
while i<10 do inc(i);
x :=0;
while i<20 do
begin
 i:= i+2;
 if i=16 then
 begin
    continue
 end;
 inc(x); 
end;

Object Pascal

További példaprogram részletek:

while i>0 do
   if i=10 then
     break
   else 
   begin
     dec(i)
   end;

while y>1 do
begin
  inc(x);
  dec(y);
end;

if  x >= 12 then
   while  y >= 0 do  
      dec(y);

while  y <= 32 do  
   inc(y);

Elöltesztelő ciklus más programozási nyelven:

Különbségek: