Вказівка циклу з лічильником (з параметром)

Вказівка циклу з лічильником підходить для програмування тільки таких циклічних фрагментів, у яких до виконання циклу відомі початкове і кінцеве значення лічильника повторень циклу.

Якщо лічильник циклу при виконанні циклу нарощує своє значення вказівка має вид:

FOR змінна:= ПочатковеЗначенняЛічильника

TO КінцевеЗначенняЛічильника DO вказівка;

Щоб цикл виконався хоча б 1 раз ПочатковеЗначенняЛічильника повинно бути не більше ніж КінцевеЗначенняЛічильника.

Якщо лічильник циклу при виконанні циклу зменшує своє значення вказівка має вид:

FOR змінна:= ПочатковеЗначенняЛічильника

DOWNTO КінцевеЗначенняЛічильника DO вказівка;

Щоб цикл виконався хоча б 1 раз ПочатковеЗначенняЛічильника повинно бути не менше ніж КінцевеЗначенняЛічильника.

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

Необхідно пам’ятати:

1. Керуюча змінна (лічильник) пованна бути цілого типу.

2. Початкове і кінцеве значення повинні мати сумісний тип з керуючую змінною.

3. Коли починає виконуватись вказівка FOR, початкове і кінцеве значення визначається тільки 1 раз і ці значення залишаються незміннимина протязі всієї дії вказівки.

4. Коли працює вказівка FOR, значення керуючої змінної збільшується при кожному повторенні на одиницю,якщо у вказівці використовується ключове слово DOWNTO , значення керуючої змінної зменшується при кожному повторенні на одиницю.

Запишемо текст попередньо розглянутої програми, використовуючи вказівку циклу з лічильником :

PROGRAM SUMMA3;

VAR n,s,i: integer;

BEGIN

WRITE (‘Введіть кількість чисел ’);

READLN(N);

S:=0;

FOR I:=1 TO N DO IF I MOD 2=0 THEN S:=S+I;

WRITELN (‘Сума парних чисел від 1 до ’ , N, ’ дорівнює ’, S);

END.