Организация программ циклической структуры

Виды циклов: Цикл с предусловием (while) Цикл с постусловием (repeat) Цикл с параметром (for)

Цикл с параметром Как работает цикл: Сначала переменной i присваивается первоначальное значение In, затем значение i сравнивается с конечным значением Ik и если In

Цикл с параметром Первая форма записи (вперед): For i:=In to Ik do ; Вторая форма записи (назад): For i:= In downto Ik do ; тело цикла i:=In;Ik

Цикл с параметром Первая форма записи (вперед): For i:=In to Ik do begin ; end; Вторая форма записи (назад): For i:= In downto Ik do begin ; end;

Задача Вычислить сумму натуральных чисел в интервале от 10 до 20. Вывести на экран данную последовательность и сумму. (Решить тремя способами!)

Первый способ (цикл с параметром): Program summa1; Uses crt; Var i,S:integer; Begin clrscr; S:=0; for i:=10 to 20 do begin S:=S+i; write(i:4); end; writeln; writeln('S=',S); readln; End.

Цикл с предусловием (пока) Как работает цикл: Выполнение оператора цикла с предусловием начинается с проверки условия, записанного после слова while. Если оно соблюдается (true), то выполняется, затем вновь проверяется условие и т.д. Как только при очередной проверке окажется, что условие не соблюдается (false), выполняться не будет. В теле цикла обязательно должен быть оператор, влияющий на соблюдение условия, и противном случае произойдет зацикливание. Если тело цикла содержит 2 и больше операторов, то оно заключается в операторные скобки begin … end.

Цикл с предусловием (пока) While do ; Нет тело цикла условие Да While do begin ; end;

Задача Вычислить сумму натуральных чисел в интервале от 10 до 20. Вывести на экран данную последовательность и сумму. (Решить тремя способами!)

Второй способ (цикл с предусловием): Program summa2; Uses crt; Var i,S:integer; Begin clrscr; S:=0; i:=10; while i

Цикл с постусловием (до) Как работает цикл: Последовательность операторов, входящих в тело цикла, выполняется один раз, после чего проверяется соблюдение условия, записанного следом за служебным словом until. Если условие соблюдается (true), цикл завершается. В противном случае – тело цикла выполняется еще раз, после чего снова проверяется соблюдение условия. Т.к. тело цикла находится между служебными словами repeat … until, то операторные скобки не требуются.

Цикл с постусловием (до) Repeat ; Until ; Нет тело цикла условие Да

Задача Вычислить сумму натуральных чисел в интервале от 10 до 20. Вывести на экран данную последовательность и сумму. (Решить тремя способами!)

Третий способ (цикл с постусловием): Program summa3; Uses crt; Var i,S:integer; Begin clrscr; S:=0; i:=10; repeat S:=S+i; write(i:4); i:=i+1; until i>20; writeln; writeln('S=',S); readln; End.

Определить, значения переменных после выполнения фрагмента программы. Сколько раз выполнится цикл. y:=2; x:=20; while x>10 do begin x:=x–3; y:=y-x; end;

Определить, значения переменных после выполнения фрагмента программы. Сколько раз выполнится цикл. y:=1; for x:=1 to 5 do y:=y+x;

Определить, значения переменных после выполнения фрагмента программы. Сколько раз выполнится цикл. y:=1; x:=10; repeat y:=y*x; x:=x–2; until x

Изменим условие задачи (задание дается всем группам). Вычислить сумму натуральных чисел чётных и нечётных чисел в интервале от 10 до 20. На экран вывести последовательности чисел и их суммы. Задание решить с использованием любого цикла.

Задача 1. Дано натуральное число n. Вычислить сумму: 1/2+2/3+3/4+…+n/(n+1). Задача 2. Составить программу для нахождения суммы квадратов цифр целого числа Задача 3. Составить программу планирования закупки товара в магазине на сумму, не превышающую заданную величину

Контрольные вопросы (задаются всем группам): 1. Что такое цикл? 2. Какие виды циклов существуют в Паскале? 3. Как работает цикл с параметром? 4. Как выполняется цикл с предусловием? 5. Как работает цикл с постусловием? 6. Чем отличаются циклы с условием?

Домашнее задание: Конспект. Задача. Вычислить сумму ряда чисел: 5, 7, кратных 5. На экран вывести последовательности чисел и их сумму. Задание решить с использованием каждого цикла. Сколько раз выполняется каждый цикл.