Free Pascal - Cyklus s podmienkou na začiatku : while do

testovanie podmienky sa vykonáva na začiatku cyklu. pred každou iteráciu je podmienka testovaná, či bola splnena. už pred prvou spustením dôjde k otestovaniu podmienky, použitie tohto cyklu je vynikajúci v situáciách kedy možno že ani raz nebude treba vykonat cyklus.

while do

Popis

while condition do statement;
Použitá kľúčové slová: do while

Vstup

Poznámka: tu použiteľné príkazy:
Príkaz prerušenie príkaz pokračovanie

Príklady

Free Pascal

možné požitie Cyklus s podmienkou na začiatku :
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;

Free Pascal

Ďalšie kúsky ukážkových kódu:
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);
V iných jazykoch: en hu cz sk