Протабулювати функцію y=x2 на відрізку [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) Розв’язати квадратне рівняння:
ax2+bx+c=0, при a¹0.
- записати блок схему і програму.
3) Знайти суму чисел кратних трьом з відрізка [n;100].
- записати блок схему і програму циклами для (FOR/DO) і поки (WHILE/DO).
