Презентация по информатике и ИКТ для 9 класса на тему: Операторы цикла

Муниципальное бюджетное общеобразовательное учреждениесредняя общеобразовательная школа №70 г. ЛипецкаУрок «Операторы цикла»Урок информатики и ИКТ, 9 классАвтор: Иванова Юлия МихайловнаУчитель информатики и ИКТ Цели:1) образовательная: познакомить учащихся с типами алгоритмов циклической структуры, сформировать у учащихся умение записывать на языке программирования операторы цикла;2) развивающая: развить алгоритмическое и абстрактное мышление; 3) воспитательная: воспитать познавательный интерес к предмету, сформировать такие качества как усидчивость, аккуратность, внимательность. Цикл в программировании – это повторение одних и тех же действий (шагов).Тело цикла – последовательность действий, которые повторяются в цикле.Существует несколько типов алгоритмов циклической структуры: Цикл с предусловием – условие проверяется до тела цикла, т.е. условие продолжения цикла (тело цикла может не выполниться ни разу)К таким циклам относится оператор while…do («пока…делать»)While условие doBeginОператор1;Оператор2;……….Оператор n;End; Цикл с постусловием – условие проверяется после тела цикла , т.е. условие выхода из цикла (тело цикла выполнится хотя бы один раз)К таким циклам относится repeat…untilRepeatBeginОператор1;Оператор2;……….Оператор n;Until условиеEnd; Цикл с параметром – выполняется заданное число раз.К таким циклам относится цикл for…doFor параметр цикла:= начальное_значение to конечное_значение doПараметр – стартовое значениеПример: For i:=1 to 10 do Пример_1. Цикл с параметромProgram primer1;Var i, n: integer;BeginWriteln (‘введите n’); readln(n);For i:=1 to n do Writeln (i);end. Пример_2. Найти наибольший общий делитель (НОД) двух натуральных чисел а и b. Для решения этой задачи воспользуемся алгоритмом Евклида, будем уменьшать каждый раз большее из чисел на величину меньшего до тех пор, пока оба значения не станут равными. Program primer2;Var a,b: integer; BeginWriteln (‘введите два натуральных числа’);Readln(a); readln(b);While a<>b doIf a>b thenA:=a-bElseB:=b-a;Writeln (‘нод=‘, a) ;end. Пример_3. Цикл с постусловиемProgram primer2;Var a,b: integer; BeginWriteln (‘введите два натуральных числа’);Readln(a); readln(b);Repeat If a>b thenA:=a-bElse B:=b-a;Until a=b;Writeln(‘нод=‘,а);end.