Цикл поки

While умова do begin

Тіло циклу

end;

Вказівка виконується таким чином: перевіряється виконання умови, записаної після слова WHILE (поки), і якщо ця умова виконується то виконується серія операторів (тіло циклу), після чого знову повертається до перевірки виконання вказаної умови (зустрівши слово END). Вказані дії виконуються доти, поки умова, яка перевіряється дає істино. Якщо умова не виконується (результат виконання умови є хибно), то тіло циклу пропускається і виконання вказівки повторення закінчується.

Завдання 5. Знайти суми елементів збіжного ряду з точністю Е=0.01 (тобто рахувати суму поки елементи ряду більші за Е)

Тут використовуємо цикл поки, тому що наперед не відомо кількість елементів ряду які необхідно просумувати.

Отже, використовуємо цикл для сумування, добутку, підрахунку елементів ряду.

var n,f:integer;

s,a:real;

begin

S:=0;

F:=1;

N:=1; a:=1;

While a>0.01 do

begin

F:=F*n;

S:=S+n/F;

N:=n+1;

end;

writeln(S);

end.

Можна використовувати цикл для виведення таблиць.

Завдання 6

Протабулювати функцію y=x² на відрізку [a,b] кроком h.

var x,,y,a,b,h:real;

begin

readln(a,b,H);

x:=a;

while x<=B do begin

Y:=x*x;

writeln(x,’ ‘,y);

end;

end.

Цикли можуть бути вкладеними

Завдання7

Вивести таблицю Піфагора.

var A,B,C:INTEGER;

BEGIN

For a:=2 to 9 DO BEGIN

For b:=2 to 9 DO BEGIN

C:=a*b; WRITE(C:3);

END;

WRITELN;

END;

END.

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

Підсумок лекції:

Використання розгалуження і циклу.

Перерахувати розглянуті програми:

- перевірка умови і виконання одного або іншого оператора

- знаходження суми, добутку елементів числового ряду

- виведення і формування даних у вигляді таблиці

Запитання для самоконтролю

1.Який алгоритм називається розгалужений?

2.Як записується розгалужений алгоритм у вигляді блок схеми?

3.Як записується повна і коротка форми розгалуження в Basic?

4.Перерахуйте операції відношення і логічні операції?

5.Як виконується структура розгалуження?

6.Використання оператора безумовного переходу. Запис мітки.

7.Циклічний алгоритм. Що це?

8.Яка блок схема циклу “для”?

9.Який запис циклу мовою програмування?

10.Як виконується цикл?

11.Яка блок схема циклу “поки”?

12.Який запис циклу “поки” мовою програмування?

13.Які цикли називаються вкладеними?

Завдання:

1) Знайти значення Z,

- записати блок схему і програму.

2) Розв’язати квадратне рівняння:

ax²+bx+c=0, при a¹0.

- записати блок схему і програму.

3) Знайти суму чисел кратних трьом з відрізка [n;100].

- записати блок схему і програму циклами для (FOR/DO) і поки (WHILE/DO).