A kiválasztott változat és az aktuális verzió közötti különbségek a következők.
— |
inf-prog-fszi:utotesztelo_ciklus [2017/06/17 18:21] (aktuális) beistvan létrehozva |
||
---|---|---|---|
Sor 1: | Sor 1: | ||
+ | ====== Ciklusok. Utótesztelő ciklus. Repeat-until/ | ||
+ | |||
+ | ===== Repeat ciklus ===== | ||
+ | |||
+ | Formátum | ||
+ | |||
+ | <code pascal repeat.txt> | ||
+ | repeat | ||
+ | {ciklusmag ismétlődik, | ||
+ | amíg a logikai_kifejezés HAMIS}; | ||
+ | until logikai_kifejezés; | ||
+ | </ | ||
+ | |||
+ | Példa | ||
+ | |||
+ | <code pascal repeat.pas> | ||
+ | a := 2; | ||
+ | repeat | ||
+ | writeln(a); | ||
+ | a := a + 1 | ||
+ | until a >= 6; | ||
+ | </ | ||
+ | |||
+ | ===== Végtelen ciklus ===== | ||
+ | |||
+ | <code pascal repeatvegtelen.pas> | ||
+ | repeat | ||
+ | until false; | ||
+ | </ | ||
+ | |||
+ | <code pascal repeatvegtelen2.pas> | ||
+ | a := 2; | ||
+ | repeat | ||
+ | writeln(a); | ||
+ | until a >= 6; | ||
+ | {az a ciklusváltozó nem növekszik!} | ||
+ | </ | ||
+ | |||
+ | ===== Break ===== | ||
+ | |||
+ | <code pascal repeatbreak.pas> | ||
+ | var | ||
+ | i:integer; | ||
+ | begin | ||
+ | i := 0; | ||
+ | repeat | ||
+ | i := i + 1; | ||
+ | if i = 10 then break; | ||
+ | until false; | ||
+ | end; | ||
+ | </ | ||
+ | |||
+ | ===== Continue ===== | ||
+ | |||
+ | <code pascal repeatcontinue.pas> | ||
+ | var | ||
+ | i:integer; | ||
+ | begin | ||
+ | i := 0; | ||
+ | repeat | ||
+ | i := i + 1; | ||
+ | if i = 10 then continue; | ||
+ | until false; | ||
+ | end; | ||
+ | </ | ||
+ | |||