Циклические конструкции в алгоритмах.

2 Цикл – организация повторений в алгоритмах. Циклические алгоритмы строятся в соответствии с базовой алгоритмической структурой Цикл. В них некоторая часть команд повторяется некоторое количество раз: Да Нет Телом цикла называются команды, многократно повторяющиеся в процессе его выполнения.

3 По этому признаку они делятся на: алгоритмы типа «Для» или циклами со счетчиком (с заранее известным числом повторений ) и алгоритмы типа «Пока / До» (с заранее неизвестным числом повторений ).

4 Регулярные циклы. Цикл со счётчиком (цикл «Для»). Цикл Для необходим в том случае, когда количество повторений заранее и з в е с т н о. Цикл Для: ПОВТОРЯТЬ n раз тело цикла Цикл Для необходим в том случае, когда количество повторений заранее и з в е с т н о. Цикл Для: ПОВТОРЯТЬ n раз тело цикла

5 В алгоритмическом языке цикл «Для» записывается служебными словами: Алг название Нач для i от n1 до n2 для i от n1 до n2 нц нц P1 P1 P2 P2 … P N P N кц кц Кон i - счётчик n1 – нижняя граница счётчика n2 - верхняя граница счётчика счётчика – начало цикла Нц – начало цикла P - действия в цикле Кц - конец цикла

6 БЛОК – СХЕМА БЛОК – СХЕМА (цикл «Для»). НАЧАЛО i = n1, n2, (шаг) Действия в цикле (тело цикла) КОН

7 Параметр цикла - величина, от которой зависит число повторений в цикле. Цикл заканчивается тогда, когда параметр цикла принимает нужное значение.

8 Задача 1: Составить алгоритм и программу для расчёта координат точек графика функции Y=8*x 2 -2*x+13 в любом интервале. Задача 1: Составить алгоритм и программу для расчёта координат точек графика функции Y=8*x 2 -2*x+13 в любом интервале. Алг расчет Y Арг X,X1, X2 Арг X,X1, X2 Рез Y Рез Y Нач Y= 0 Ввод нач. инт X1 Ввод кон. инт. X2 Для X от X1 до X2 Y=8*x 2 -2*x+13 Вывод X, Y Кц Кон ПРОГРАММА: ПРОГРАММА: Program CA1; var X,X1,X2: integer; var X,X1,X2: integer; Y: real; Y: real;Begin Y:=0; Y:=0; Writeln('нач. инт. '); Writeln('нач. инт. '); readln (X1); readln (X1); Writeln('кон. инт. '); Writeln('кон. инт. '); readln (X2); readln (X2); for x:=x1 to x2 do for x:=x1 to x2 do begin begin Y:=8*sqr(x)-2*x+13; Y:=8*sqr(x)-2*x+13; Writeln('X=',x,' Y=',y:5:2); Writeln('X=',x,' Y=',y:5:2); end; end; Readln; Readln;end. ! Вычисление функции с шагом 1.

9 Пример запуска программы задачи 1:

10 Рассмотрим примеры программ: Вычисление с шагом 1. (1- шаг_не 1)Вычисление с шагом 1. ПРИМЕРЫ (2- прим_цикл_прогрПРИМЕРЫ

11 Задача 2: Составить алгоритм и программу для расчета энергии конденсатора где С - ёмкость конденсатора, любая величина U - напряжение на пластинах конденсатора, изменяется в любом интервале. Задача 2: Составить алгоритм и программу для расчета энергии конденсатора по формуле: где С - ёмкость конденсатора, любая величина U - напряжение на пластинах конденсатора, изменяется в любом интервале. Алг расчет энергии конденсатора арг С, X1, X2, U арг С, X1, X2, U (вещ C,W; цел U, X1,X2) рез W рез WНач W = 0 Ввод С, X1, X2 для U от X1 до X2 для U от X1 до X2 W = C*U 2 /2 W = C*U 2 /2 вывод U, W вывод U, W кц кц Кон Программу самостоятельно ! X1 – нач инт X2 - кон инт

12 Задача 3: Напечатать на экране 20 раз слово ПРИВЕТ !!! !!! Использовать цикл по счётчику. Напечатать в столбец, затем в строку. вывод i = 1, 20, 1

13 Задача 4: Составить алгоритм и программу для расчёта функции: Y = Алг расчёт функции (вещ X,Y,Z арг X, Z цел i, k ) рез Y нач (округл) X= -18; E=2.71; k=(18+18)/3+1 для I от 1 до k Z = 5*X-PI*X если Z 0 то иначе всё вывод Z, X, Y X=X+3 кц кон Составить программу самостоятельно !

14 Задача 5: Напечатать таблицу стоимости конфет весом 50, 100, гр. по цене 130 руб. за 1 кг. Все данные расположите в несколько столбцов так, чтобы они были видны на экране. Напечатать таблицу стоимости конфет весом 50, 100, гр. по цене 130 руб. за 1 кг. Все данные расположите в несколько столбцов так, чтобы они были видны на экране. GotoXY(x,y); Y Х WhereXWhereY Текущую позицию курсора можно изменить вызовом процедуры GotoXY(x,y); где Y определяет номер заданной строки, Х определяет положение курсора в новой строке от левого края. С помощью функций WhereX и WhereY можно получить горизонтальную и вертикальную координаты текущего положения курсора. Например: x := WhereX.

15 Задача 6: Напечатать числа, кратные 7 из любого интервала. Найти их количество. Алг печать и кол-во чисел Арг N, K ( нач и кон интервала) Арг N, K ( нач и кон интервала) Рез P, I (кол-во кратных чисел и сами числа) Рез P, I (кол-во кратных чисел и сами числа) Нач P =0 Ввод N, K Для I от N до K Если I кратно 7 Если I кратно 7 то вывод I ; P =P+1 то вывод I ; P =P+1 Все Все Кц вывод P вывод PКон Программу самостоятельно! Программу самостоятельно!

16 Задача 7: Вычислить сумму ряда: Задача 7: Вычислить сумму ряда: Алг сумма ряда Арг N - число слагаемых Арг N - число слагаемых Рез S Рез SНач S = 0 S = 0 Ввод N Ввод N Для I от 1 до N Для I от 1 до N S = S + 1/ (2*I-1) S = S + 1/ (2*I-1) Кц Кц Вывод S Вывод SКон Программу самостоятельно! Программу самостоятельно!

17 Задача 8: Составить алгоритм и программу для нахождения по формуле: Алг Сумма арг А, X рез Y нач Y:=0; ввести А; Алг Сумма (вещ A,Y; цел Х) арг А, X рез Y нач Y:=0; ввести А; для Х от 5 до 100 для Х от 5 до 100 расчёт Y; расчёт Y; кц вывод Y кон кц вывод Y кон Программу самостоятельно! Программу самостоятельно!

18 Вычислить количество шаров в пирамиде из N слоёв, если количество шаров в слое равно квадрату порядкового номера слоя. N вводится с клавиатуры. Задача 9: Вычислить количество шаров в пирамиде из N слоёв, если количество шаров в слое равно квадрату порядкового номера слоя. N вводится с клавиатуры. Алг кол-во шаров арг N, i рез К нач K =0; ввод N для I = 1 до N K = K + I 2 кц вывод К кон Алг кол-во шаров (цел N,I,K) арг N, i рез К нач K =0; ввод N для I = 1 до N K = K + I 2 кц вывод К кон Программу самостоятельно! Программу самостоятельно!

19 ВЛОЖЕННЫЕ ЦИКЛЫ. Вложенным называется цикл, находящийся полностью внутри другого цикла. В структуре вложенности могут участвовать различные типы циклов. Закрытие вложенных циклов - сначала закрывается внутренний цикл, затем внешний. Закрытие вложенных циклов - сначала закрывается внутренний цикл, затем внешний. При каждом изменении параметра внешнего цикла происходит полное выполнение очередного внутреннего цикла. При каждом изменении параметра внешнего цикла происходит полное выполнение очередного внутреннего цикла.

20 Program Vl_cikl; Uses CRT; Var i,j:integer; Begin ClrScr; For i:=1 to 10 do Begin for j:=1 to 5 do Write( i,'*', j,'=', i*j, ' '); Writeln; End; End.

21 Найти и вывести на экран количество 2-х значных чисел, у которых при умножении на 3 сумма цифр кратна 5. Задача 10: Найти и вывести на экран количество 2-х значных чисел, у которых при умножении на 3 сумма цифр кратна 5. алг 2-х значные числа (цел A, B, AB, X, S, K; вещ A1, A2, A3) арг A, B, A1,A2,A3,X,S рез AB, K нач для А от 1 до 9 для В от 0 до 9 АВ=А*10+В; Х=АВ*3; А1 = int(X/100); A2 = int(X/10) – A1*10; A3 = X – A1*100 – A2*10; S = round(A1 + A2 + A3); если S кратно 5 то К = К + 1; вывод АВ; всё кц кц вывод К кон Программу самостоятельно! Программу самостоятельно!

22 Дополнительные задачи для самостоятельного решения. ( 3 – Доп_сам_) и ( 5 – Доп_задачи_FOR) ( 3 – Доп_сам_) 5 – Доп_задачи_FOR) ( 3 – Доп_сам_) 5 – Доп_задачи_FOR) St.pas (степень) ТЕСТ ТЕСТ ( 4 – Тест_ЕГЭ)