Тема 5. Операторы цикла
Цель
Овладеть принципом работы операторов цикла.
Задачи
Раскрыть необходимость использования операторов цикла.
Изучить синтаксис записи оператора For (цикл с заданными параметрами) и научиться использовать данный оператор в алгоритмах.
Изучить синтаксис записи оператора While (с предусловием) REPEAT…UNTIL (с постусловием) и научиться использовать данные операторы в алгоритмах.
Научиться манипулировать работой цикла.
Дать анализ работы трёх циклов.
I. Оператор цикла с заданными параметрами For
Основные понятия
1. Оператор цикла For с положительным шагом используется, когда изменение параметра цикла увеличивается на 1.
For <параметр цикла>:= <S1> TO <S2> DO <оператор>;
2. Оператор цикла For с отрицательным шагом используется, когда изменение параметра цикла уменьшается на 1.
For <параметр цикла>:= <S1> DOWNTO <S2> DO <оператор>;
где <параметр цикла> — переменная целого либо перечисляемого типа.
Задания
Выполните задания, размещённые на слайде № 54 презентации.
2. Выполните задания, размещённые на слайде № 56 презентации.
Контроль знаний
1. Цикл с параметром исполняет некоторую команду определённое количество раз. Это количество задаётся с помощью _________________ цикла.
2. _____________________ можно использовать в теле цикла для проведения вычислений.
3. Функция
___________________ возвращает целое случайное
число из диапазона
4. Для того чтобы при каждом запуске программы функция random(n) генерировала новую случайную последовательность, в начале программы производят её инициализацию с помощью процедуры __________________.
5. В
результате выполнения фрагмента
программы на экран должно быть выведено
значение
Выберите правильный фрагмент из
приведённых ниже. В остальных программах
укажите строки, в которых, по вашему
мнению, содержится ошибка. Ответ:
________.
VAR i,n:integer; BEGIN read(n); for i:=1 to 10 do Begin n:=n*i; WriteLn(n); End; END. |
VAR i,n,p:integer; BEGIN read(n); p:=1; for i:=2 to n do p:=p*i; WriteLn (p); END.
|
VAR i,n,p:integer; BEGIN read(n); for i:=2 to n do p:=p*i; WriteLn (p); END. |
VAR i,n,p:integer; BEGIN read(n); p:=1; for i:=1 to n do Begin p:=p*i; WriteLn (p); END; |
II. Оператор цикла с предусловием While
Основные понятия
While <условие> DO <оператор>;
Проверка условия выполнения тела цикла производится в самом начале работы оператора.
Задание
Выполните задания, размещённые на слайде № 59 презентации.
Контроль знаний
Какое значение примет переменная х в результате выполнения приведённых ниже фрагментов программ?
x:=1; while x<10 do x:=x+3; x:=x+1;
Ответ: ______. |
x:=1; while x<10 do begin x:=x+3; x:=x+1; end; Ответ: ______. |
x:=1; while x<>1 do begin x:=x+3; x:=x+1; end;
Ответ______. |
x:=1; while x<100 do begin x:=x*2; end;
Ответ: _____. |