Приклади програм з використанням оператора for

ПрограмаDemoFor1виводить на екран таблицю перекладу із градусів за шкалою Цельсія(С) у градуси за Фаренгейтом(Р) для значень від 15°С до 30°З кроком 1 градус. Переклад здійснюється за такою формулою: F = С*1.8+32.

for I:= 15 to 30 do

Writeln('no Цельсію= ',I,' за Фаренгейтом= ', F:5:2)

У блоці опису змінних описані параметр циклуIтипуintegerі зміннаF— температура за Фаренгейтом типуreal. ЗміннаI,крім функцій керуючої змінної, є змінною, що зберігає цілі значення температури за шкалою Цельсія. На початку виконання програми на екран виводиться напис' Температура', а потім оператором повтору виводиться таблиця співвідношення температури в шкалах Цельсія та Фаренгейта. Друк таблиці виконується операторомWriteln('За Цельсієм= ',I,' за Фаренгейтом= ', F: 5:2).

Цикл виконується в такий спосіб.

При першому зверненні до оператораforобчислюються значення початкового(15)кінцевого(30)параметрів циклу, і змінної керуючоїIприсвоюється початкове значення15.

Потім циклічно виконується таке:

Перевіряється умоваI30,оператор тіла циклу не виконується, а управління програмою передається межі оператораfor, у прикладі на операторend. Програма завершує роботу.

3. Значення параметра циклуIзбільшується на одиницю і управління передається в заголовок циклуforдля перевірки умови.

Далі цикл повторюється починаючи з пункту 1.

Другим прикладом оператора циклуforможе бути програмаDemoFor2, яка друкує на екрані символи американського стандартного коду обміну інформацією(ASCII)в порядкузменшеннякоду.

for A:= 255 downto 0 do Циклззменшеннямпараметра>

Writeln('код символу = ',А, 'символ == ',Chr(A));

У цій програмі застосовуєтьсяцикл for із зменшенням значення керуючої змінноїА (використовується вказівка ​​downto- спадання).

Оператор повтору Repeat

Оператор повторуrepeatмає дві особливості:

Умову перевіряють після чергового виконання операторів тіла циклу (чергової ітерації) і таким чином гарантується хоча б одноразове виконання циклу.

Критерієм припинення циклу є рівність виразу константіTrue.

За цей циклrepeatчасто називаютьциклом з постумовою, абоциклом "ДО",так як він припиняє виконуватися, як тільки значення висловлювання умови, записаного після словаuntil,іTrue (істина).

Оператор повторуrepeatскладається ззаголовка repeat,тіла та умови закінчення until.

Оператори, укладені між словамиrepeat та until,є тілом циклу. Спочатку виконується тіло циклу, потім перевіряється умова виходу із циклу. Саме тому цикл, організований за допомогою оператораrepeat, у будь-якому випадкувиконається хоча б один раз. Якщо результат булевського виразу дорівнюєFalse,то тіло циклу активізується ще раз; якщо результатTrue, відбувається вихід із циклу.

При програмуванні операторів тіла циклу слід забезпечити вплив принаймні одного з операторів тіла циклу на значення умови, інакше цикл виконуватиметься нескінченно.

---