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; | ||
| + | </ | ||
| + | |||