1 578
editací
Změny
repeat, until
=Podmienené cykly (cykly s nekonečným počtom opakovaní)=
'''REPEAT .. UNTIL'''
REPEAT
príkaz;
..
UNTIL (podmienka);
Cyklus '''REPEAT''' .. '''[[UNTIL]]''' je založený na tom, že príkazy sa môžu vykonať nekonečne veľa krát. Opakovanie bude ukončené až vtedy keď bude splnená podmienka zadaná za slovíčkom '''[[UNTIL]]'''.
Repeat
WriteLn('Stlac klaves ENTER ak chces pokracovat');
ch:=ReadKey;
Until (ch=#13);
Program bude po každom stlačení klávesy na obrazovku vypisovať text dovtedy pokiaľ, nebude stlačená klávesa ENTER.
'''[[WHILE]]'''
WHILE (podmienka) DO BEGIN
príkaz;
..
END;
Príkazy medzi '''BEGIN .. END''' sa budú vykonávať dovtedy, pokiaľ bude splnená podmienka v časti '''[[WHILE]]'''. Cyklus je podobný '''REPEAT .. UNTIL''' s tým rozdielom že v tomto cykle sa podmienka testuje na začiatku, zatiaľ čo pri '''[[REPEAT]]''' až po prvom vykonaní príkazov. Z tohto vyplýva, že '''REPEAT .. UNTIL''' sa vykoná najmenej raz, zatiaľ čo '''[[WHILE]]''' sa nemusí vykonať ani raz.
i:=0;
while (i<10) do begin
i:=i+1;
WriteLn('I=',i);
end;
Premenná i slúži ako počítadlo. Na začiatku sa nastaví na hodnotu 0. V podmienke sa testuje, či je menšia ako 10. Pokiaľ je i menšie potom sa vykonávajú príkazy medzi BEGIN..END. Jeden z príkazov je aj zväčšenie premenej i. Takže cyklus sa zopakuje celkovo 10 krát.
[[Category:Príručka_pre_Pascal_(lite)]]
'''REPEAT .. UNTIL'''
REPEAT
príkaz;
..
UNTIL (podmienka);
Cyklus '''REPEAT''' .. '''[[UNTIL]]''' je založený na tom, že príkazy sa môžu vykonať nekonečne veľa krát. Opakovanie bude ukončené až vtedy keď bude splnená podmienka zadaná za slovíčkom '''[[UNTIL]]'''.
Repeat
WriteLn('Stlac klaves ENTER ak chces pokracovat');
ch:=ReadKey;
Until (ch=#13);
Program bude po každom stlačení klávesy na obrazovku vypisovať text dovtedy pokiaľ, nebude stlačená klávesa ENTER.
'''[[WHILE]]'''
WHILE (podmienka) DO BEGIN
príkaz;
..
END;
Príkazy medzi '''BEGIN .. END''' sa budú vykonávať dovtedy, pokiaľ bude splnená podmienka v časti '''[[WHILE]]'''. Cyklus je podobný '''REPEAT .. UNTIL''' s tým rozdielom že v tomto cykle sa podmienka testuje na začiatku, zatiaľ čo pri '''[[REPEAT]]''' až po prvom vykonaní príkazov. Z tohto vyplýva, že '''REPEAT .. UNTIL''' sa vykoná najmenej raz, zatiaľ čo '''[[WHILE]]''' sa nemusí vykonať ani raz.
i:=0;
while (i<10) do begin
i:=i+1;
WriteLn('I=',i);
end;
Premenná i slúži ako počítadlo. Na začiatku sa nastaví na hodnotu 0. V podmienke sa testuje, či je menšia ako 10. Pokiaľ je i menšie potom sa vykonávajú príkazy medzi BEGIN..END. Jeden z príkazov je aj zväčšenie premenej i. Takže cyklus sa zopakuje celkovo 10 krát.
[[Category:Príručka_pre_Pascal_(lite)]]