Программирование циклов Операторы цикла Искандарова А.Р. учитель информатики МБОУ СОШ 18 г. Уфа. - презентация

1 Программирование циклов Операторы цикла Искандарова А.Р. учитель информатики МБОУ СОШ 18 г. Уфа

2 ВОПРОСЫ ДЛЯ ПОВТОРЕНИЯ 1. Какая геометрическая фигура обозначает в блок-схеме действие? Прямоугольник 2. Какая геометрическая фигура обозначает в блок-схеме условие? Ромб 3. Какой оператор описывает в программе ввод данных? Read, readln 4. Какой оператор описывает в программе вывод данных? Write, writeln

3 ОПЕРАТОРЫ ЦИКЛА 1. Цикл с предусловием (цикл - пока)Цикл с предусловием (цикл - пока) While do ; 2. Цикл с постусловием (цикл - до)Цикл с постусловием (цикл - до) Repeat until ; 3. Цикл с параметром (цикл - для)Цикл с параметром (цикл - для) 1)for i:=In to Ik do ; 2) for i:=In downto Ik do ;

4 ЦИКЛ С ПРЕДУСЛОВИЕМ (ЦИКЛ - ПОКА) While do ; Пока условие – истинно, выполняется тело цикла. Тело цикла может быть простым или составным оператором. условие да нет тело цикла

5 ЦИКЛ С ПОСТУСЛОВИЕМ (ЦИКЛ - ДО) Repeat until ; Повторяется выполнение тела цикла до истинности условия. Тело цикла с постусловием выполняется хотя бы один раз. тело цикла условие да нет

6 ЦИКЛ С ПАРАМЕТРОМ (ЦИКЛ - ДЛЯ) 1. for i:=In to Ik do ; 2. for i:=In downto Ik do ; i – параметр цикла – простая переменная порядкового типа; In – выражение того же типа, определяющее начальное значение параметра; Ik – выражение того же типа, определяющее конечное значение параметра; Цикл повторяется, пока значение параметра лежит в интервале между In и Ik. тело цикла i:=In, Ik

7 СКОЛЬКО РАЗ ВЫПОЛНИТСЯ ТЕЛО ЦИКЛА? 1) x:=5; for i:=-1 to 5 do x:=x+1; Ответ: 7 2) s:=0; for i:=4 to 1 do s:=s+1; Ответ: ни разу

8 КАКОЕ ЗНАЧЕНИЕ ПРИМЕТ ПЕРЕМЕННАЯ Х В РЕЗУЛЬТАТЕ ВЫПОЛНЕНИЯ АЛГОРИТМА: 1.x:=3; while x<10 do x:=x+3; x:=x+1; Ответ: 13

9 КАКОЕ ЗНАЧЕНИЕ ПРИМЕТ ПЕРЕМЕННАЯ Х В РЕЗУЛЬТАТЕ ВЫПОЛНЕНИЯ АЛГОРИТМА: 1.x:=3; while x<10 do begin x:=x+3; x:=x+1; end; Ответ: 11

10 СКОЛЬКО РАЗ БУДЕТ ПОВТОРЕН ЦИКЛ, ЧЕМУ БУДУТ РАВНЫ S, A, B? a:=1; b:=1; While a+b < 8 do begin a:=a+1; b:=b+2; end; S:=a+b; Ответ: 2 раза S=8, a=3, b=5

11 ОПРЕДЕЛИТЕ ЗНАЧЕНИЕ ПЕРЕМЕННОЙ S ПОСЛЕ ВЫПОЛНЕНИЯ ПРОГРАММЫ: Var a,S: integer; Begin S:=0; For a:=5 downto 1 do S:=s+2*a; Writeln('S=', S); End. Ответ: S=30

12 ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N Program summa1; Var N,i,S: integer; Begin Write('N='); readln(N); S:=0; i:=1; While i<=N do begin S:=S+i; i:=i+1; end; Writeln('S=', S); End. начало конец ввод N S:=0; i:=1 i<=N S:=S+i; i:=i+1 Вывод S да нет

13 ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N Program summa2; Var N,i,S: integer; Begin Write('N='); readln(N); S:=0; i:=1; Repeat S:=S+i; i:=i+1; Until i>N; Writeln('S=', S); End. начало конец ввод N S:=0; i:=1 i>N S:=S+i; i:=i+1 Вывод S да нет

14 ВЫЧИСЛИТЬ СУММУ НАТУРАЛЬНОГО РЯДА ЧИСЕЛ ОТ 1 ДО N Program summa3; Var N, i, S: integer; Begin Write( ' N= ' ); readln(N); S:=0; For i:=1 to N do S:=S+i; Writeln('S=', S); End. начало конец ввод N S:=0; i:=1, N S:=S+i; Вывод S

15 КОМПЬЮТЕРНЫЙ ТЕСТ Мультимедийный тест по информатике "Язык программирования Pascal. Циклы"Мультимедийный тест по информатике "Язык программирования Pascal. Циклы"

16 ЗАДАЧИ ДЛЯ САМОСТОЯТЕЛЬНОГО РЕШЕНИЯ 1. Найти сумму квадратов от 1 до N. (S = … + n 2 ) 2. Найти произведение … n. 3. Найти сумму 1! + 2! + 3! +…+ n! (n!= … n)

17 ИСПОЛЬЗОВАННАЯ ЛИТЕРАТУРА: Угринович Н.Д. Информатика и ИКТ: учебник для 9 класса. М.:БИНОМ. Лаборатория знаний, 2010 Семакин И.Г., Хеннер Е.К. Задачник- практикум в 2 т.: Том 1. М.: БИНОМ. Лаборатория знаний, http:// Рисунок из коллекции Microsoft Office.