Лабораторная работа №4 Тема: «Цикл. Цикл с условием».

Цель: научиться составлять блок-схему решения задачи с циклом с условием и реализовывать полученный алгоритм средствами языка программирования. Ход выполнения: - изучить теоретический материал, представленный в лабораторной работе; - составить алгоритмы задач, выбранных в соответствии с вариантом, средствами блок-схем; - составить программы, реализующие полученные алгоритмы, отладить программы; - предоставить отчёт по лабораторной работе учителю.

Цикл ПОКА предписывает выполнять тело цикла до тех пор, пока выполняется условие

while <логическое выражение> do <тело цикла> ; Пока значение логического выражения – true (истина), выполнятся тело цикла. Если тело цикла состоит из нескольких операторов, то они объединяются операторными скобками Begin – end; При исполнении цикла Пока команды тела цикла могут не выполниться ни разу, если условие сразу не верно.

Теоретический материал.
Цикл – алгоритмическая структура, позволяющая многократно выполнять некоторую совокупность действий, которая называется телом цикла.
Существует несколько видов циклов. Рассмотрим цикл с условием.
Цикл с условием предписывает выполнять тело цикла в зависимости от выполнения (или не выполнения) некоторого условия. Используется, если заранее НЕ известно число повторений.
Существует два вида цикла с условием: цикл с предусловием (ПОКА) и цикл с постусловием (ДО)

Цикл ДО предписывает выполнять тело цикла до тех пор, пока не выполнится условие

repeat <тело цикла> until <логическое выражение>; Повторение выполнения тела цикла заканчивается, когда логическое выражение принимает значение true (истина). При исполнении цикла До команды тела цикла выполняются обязательно, хотя бы один раз.

Внимание! В теле цикла обязательно должна изменяться та переменная, которая стоит в условии цикла. Если этого не происходит, то произойдёт зацикливание программы, т.е. программа будет исполняться не останавливаясь. Причём, если в условии стоит знак < (или ≤), то переменная должна увеличиваться, а если знак > (или ≥), то переменная должна уменьшаться.

ПРИМЕР 1 . Составить таблицу исполнения фрагмента алгоритма:

S:=4; i:=5; while i>=3 do begin s:=s+2*i; i:=i-0.5; end;

Шаг	s	i	Проверка условия
1	4
2		5
3			5>=3 да
4	14
5		4,5
6			4,5>=3 да
7	23
8		4
9			4>=3 да
10	31
11		3,5
12			3,5>=3 да
13	38
14		3
15			3>=3 да
16	44
17		2,5
18			2,5>=3 нет

ПРИМЕР 2. Составить программу вывода на экран квадратов чисел от 1 до 5 с шагом 0.5 и вычисления суммы этих чисел.

	Program primer2; var i, k, s :real; begin writeln(‘ таблица квадратов чисел и их сумма’); writeln(‘число квадрат’); i:=1; s:=0; while i<= 5 do begin k:=i*i; writeln( i:4:1, k:8:2); s:=s+i; i:=i+0.5; end; writeln( ‘сумма равна ’, s:8:1); end.

Коментарии: оператор writeln(‘число квадрат’); печатает на экране заголовок таблицы вывода. Оператор writeln( i:4;1, k:8;2); выводит на экран пару (число и его квадрат) отводя под число i 4 позиции 1 из которых под дробную часть числа, а для k 8 позиций 2 из которых под дробную часть. При этом результаты будут выведены на экран в виде таблицы.

ПРИМЕР 3. Составить программу вычисления суммы первых членов геометрической прогрессии, больших 5, если b₁=243, q=1/3

Program primer3; Var P,i: rtal; begin write (‘вычисление суммы членов геометрической прогрессии '); S:=0; b:=243; while b>5 do begin S:=S+b; b:=b*1/3; end; writeln (‘Сумма равна ', S);  end.

Вар 1	Вар 2	Вар 3	Вар 4	Вар 5	Вар 6	Вар 7
1(1) 2(1) 3(1) 4(1) 5(1)	1(2) 2(2) 3(2) 4(2) 5(2)	1(3) 2(3) 3(3) 4(3) 5(3)	1(4) 2(4) 3(4) 4(4) 5(4)	1(5) 2(5) 3(5) 4(5) 5(5)	1(6) 2(6) 3(6) 4(6) 5(6)	1(7) 2(7) 3(7) 4(7) 5(7)
Вар 8	Вар 9	Вар 10	Вар 11	Вар 12	Вар 13	Вар 14
1(8) 2(8) 3(8) 4(8) 5(8)	1(9) 2(9) 3(9) 4(9) 5(9)	1(10) 2(10) 3(10) 4(10) 5(10)	1(11) 2(11) 3(11) 4(11) 5(11)	1(12) 2(12) 3(12) 4(12) 5(12)	1(13) 2(1) 3(13) 4(13) 5(13)	1(14) 2(4) 3(14) 4(14) 5(14)
Вар 15	Вар 16	Вар 17	Вар 18	Вар 19	Вар 20	Вар 21
1(15) 2(5) 3(15) 4(15) 5(15)	1(13) 2(4) 3(15) 4(16) 5(16)	1(15) 2(3) 3(14) 4(17) 5(10)	1(14) 2(5) 3(13) 4(18) 5(9)	1(10) 2(11) 3(12) 4(1) 5(8)	1(11) 2(12) 3(10) 4(2) 5(7)	1(12) 2(10) 3(11) 4(3) 5(6)
Вар 22	Вар 23	Вар 24	Вар 25	Вар 26	Вар 27	Вар 28
1(9) 2(8) 3(7) 4(4) 5(5)	1(8) 2(7) 3(9) 4(5) 5(4)	1(7) 2(9) 3(8) 4(6) 5(3)	1(4) 2(5) 3(6) 4(7) 5(2)	1(5) 2(6) 3(4) 4(8) 5(1)	1(6) 2(4) 3(5) 4(9) 5(16)	1(2) 2(1) 3(3) 4(10) 5(15)
Вар 29	Вар 30	Вар 31	Вар 32	Вар 33	Вар 34	Вар 35
1(1) 2(12) 3(2) 4(11) 5(14)	1(12) 2(3) 3(15) 4(12) 5(13)	1(9) 2(2) 3(5) 4(13) 5(12)	1(8) 2(1) 3(9) 4(14) 5(11)	1(7) 2(6) 3(11) 4(15) 5(3)	1(6) 2(8) 3(12) 4(16) 5(8)	1(5) 2(10) 3(13) 4(17) 5(11)

Наборы заданий