Тема урока:
|
For Счетчик=Начало To Конец [Step Шаг] [операторы цикла] [ExitFor] Next [Счетчик] |
Счетчик – числовая переменная, используемая как счетчик цикла;
Начало – начальное значение счетчика;
Конец – конечное значение счетчика;
Шаг – шаг изменения значения счетчика, по умолчания 1;
Exit For – используется для немедленной остановки цикла For … Next.
Действие оператора: вычисляется значение выражения Начало, которое присваивается переменной Счетчик. Затем идет выполнение операторов цикла. При достижении Next переменная Счетчик увеличивается на значение выражения Шаг. Значение Счетчика сравнивается со значением выражения Конец. Если значение Счетчика больше этого значения, то выполняется оператор, следующий за Next, если меньше или равно, то управление передается на начало тела цикла. При отрицательных значениях Шага идет уменьшение Счетчика. Значение Шага может быть дробным.
Пример 1. (Cлайд 7)
Dim i As Integer
Dim A As Integer
A=3
For i=1 To 3
A=A*i
Next i
Print A
Вопрос: cколько раз будет выполняться тело цикла?
Вопрос: что будет напечатано на форме?
Пример 2. (Cлайд 8)
Dim i As Integer
Dim A As Integer
A=3
For i=3 To 1 Step 1
A=A*i
Next i
Print A
Вопрос: сколько раз будет выполняться тело цикла?
Вопрос: что будет напечатано на форме?
Пример 3. (Cлайд 9)
Dim i As Integer
For i=1 To 100
If i=50 Then ExitFor
Next i
Вопрос: сколько раз будет выполняться тело цикла?
Изначально этот цикл должен выполняться 100 раз, но поскольку при значении счетчика, равном 50 выполняется оператор ExitFor, тело цикла будет повторяться 50 раз.
Пример 4. (Cлайд 9)
Dim i As Integer
For i=1 To 1000: Next i
Пустой цикл может использоваться для задержки времени.
3. Циклы с условием.
При программировании повторений далеко не всегда известно количество повторов. В этих случаях используют циклы с условием, которые могут быть реализованы с помощью операторов, которые мы сейчас с вами изучим.
Можно выделить два типа циклов с условием: (слайд10)
Форматы операторов с проверкой условия в начале цикла (слайд 11)
Do While Условие
Тело цикла
[Exit Do]
Loop
Тело цикла выполняется, если Условие истинно, иначе осуществляется переход на оператор, расположенный после Loop. Если первая проверка Условия даст результат “ложь”, то цикл не выполнится ни разу.
Do Until Условие
Тело цикла
[Exit Do]
Loop
Тело цикла выполняется, если Условие ложно, иначе осуществляется переход на оператор, расположенный после Loop. Если первая проверка Условия даст результат “истина”, то цикл не выполнится ни разу.
Форматы операторов с проверкой условия в конце цикла (слайд 12)
Do While Условие
Тело цикла
[Exit Do]
Loop While Условие
Тело цикла выполняется до тех пор, пока Условие истинно, иначе выполнение цикла заканчивается.
Do
Тело цикла
[Exit Do]
Loop Until Условие
Тело цикла выполняется до тех пор, пока Условие ложно, иначе выполнение цикла заканчивается.
Отличие этого оператора от оператора цикла с предусловием: проверка условия производится после очередного выполнения тела цикла. Это обеспечивает его выполнение хотя бы один раз.
Пример 5. (Слайд 13)
Дано натуральное число. Подсчитать количество цифр в числе.
Анализ задачи:
Подсчет количества цифр начнем с последней цифры числа.
Увеличим счетчик цифр на единицу.
Число уменьшим в 10 раз (тем самым мы избавляемся от последней цифры числа).
Далее с получившимся числом проделаем ту же последовательность действий и т.д., пока число не станет равным нулю.
Программный код (слайд 14)
Dim N As Integer
Dim K As Integer
Dim M As Integer
N = Val (Text1.Text) - Вводим целое число
K = 0 - Счетчику цифр присваиваем начальное значение
M = N - Запоминаем число
Do While M <> 0 - Пока М<>0 делать цикл
K = K + 1 - Увеличим счетчик цифр на единицу
M = M/10 - "Уменьшаем" число на последнюю цифру
Loop
Print "В числе "; N, " – цифр"; K Вывод количества цифр
IV. Закрепление.
1. Выполнение лабораторной работы (слайд 15). (Приложение 2)
Задание: Напечатать фразу: "Изучаем циклы!" 15
раз и использованием оператора For … Next
(в условии
четко определено количество повторений).
Дополнительные задания: (слайд 16).
2. Выполнение практического задания (слайд 17).
Задание: вычислить сумму N натуральных чисел.
Дополнительные задания: (слайд 18)
Изменить программу таким образом, чтобы она вычисляла сумму только натуральных четных чисел в интервале до N.
Изменить программу таким образом, чтобы она вычисляла сумму только натуральных нечетных чисел в интервале до N.
3. Самостоятельная работа (для сильных учеников).
V этап. Итоги урока.
Многократное повторение одного действия или группы действий часто встречается при написании программ.
Существуют определенные правила выбора типа цикла.
если вам заранее известно число повторений тела цикла, лучше всего использовать оператор цикла For…Next;
если вам заранее не известно число повторений
тела цикла и если окончание цикла зависит от
выполнения некоторого условия, лучше использовать
конструкции
Do While…Loop или Do Until…Loop;
если необходимо, чтобы цикл выполнялся хотя бы один раз, то используйте конструкции Do… While Loop или Do… Until Loop
Оценка работы всего класса и отдельных учащихся на уроке.
4. Домашнее задание (слайд 19).
§ 4.2.4 стр. 154–157 (Угринович Н. Информатика и информационные технологии. 10–11-е классы.– М.: Лаборатория базовых знаний, 2006.)
Задания 4.2, 4.3.
Вопросы 1, 2..
Список используемой литературы:
Угринович Н., Босова Л., Михайлова Н. Практикум по информатике и информационным технологиям. – М.: Лаборатория базовых знаний, 2006.
Интренет-ресурнсы: