- •1. Тема: Современные программные средства
- •2. Количество учебных часов – 3 часа
- •3. Цели занятия:
- •4. Вопросы для подготовки к занятию:
- •5. Информационно-дидактический блок Краткая теория
- •Оператор 1, оператор 2 – какой либо оператор, в том числе и составной оператор, т.Е. Несколько операторов, объединенных операторными скобками begin end.
- •Оператор цикла с параметром
- •2. Цикл с предварительным условием
- •3. Цикл с последующим условием
- •6. Содержание занятия:
- •7. Рекомендуемая литература: Основная литература
- •Дополнительная литература
Оператор цикла с параметром
Используется, когда известно, сколько раз выполняется циклическая часть программы.
for <параметр цикла>:=<начало> to/downto <конец> do <оператор>;
для до делать
параметр цикла - числовая переменная типа integer
начало, конец - арифметическое выражение
to - используется когда начало меньше конца
downto - используется когда начало больше конца
оператор - тело цикла, любой оператор, в том числе и составной
Принцип работы:
Параметру присваивается значение начало;
Выполняется оператор - тело цикла;
Затем параметр сравнивается с концом;
Если параметр больше/меньше конца, то начинает работать следующий оператор за оператором цикла, в противном случае к параметру прибавляется/отнимается единица;
Снова выполняется оператор;
Так продолжается пока параметр не станет больше/меньше конца.
2. Цикл с предварительным условием
while <условие> do <оператор>;
пока делать
условие - логическое выражение
оператор - любой оператор, в том числе и составной.
Принцип работы:
Проверяется истинность условия;
Если условие истинно выполняется оператор;
Цикл работает, пока условие не станет ложным.
3. Цикл с последующим условием
repeat <операторы> until <условие>
повторять до тех пор пока
условие - логическое выражение
операторы - любое количество любых операторов, в том числе и составной.
Принцип работы:
Выполняются все операторы между repeat и until;
Проверяется ложность условия;
Цикл работает, пока условие не станет истинным.
Особенности и отличия операторов цикла
Вход в цикл возможен только через его начало;
Переменные оператора должны быть определены до входа в цикл;
Необходимо предусмотреть выход из цикла, чтобы он не повторялся бесконечно;
Оператор while repeat может ни разу не выполнится;
оператор repeat обязательно выполниться хотя бы раз.
Примеры программ
Написать программу, которая выводит на экран табл. умножения, например на 7. |
Program M4; Var m,n,p:integer; Begin For i:=1 to 10 do Writeln(7,’*’,I:2,’=’,7*I:2); end. |
Написать программу, которая выводит табличные значения функции у=x+2. Диапазон изменения аргумента от – 4 до 4, приращение аргумента - 0.5 |
Program M5; var x,y:real; begin clrscr; writeln('y':20,' : ','x':5); writeln(' --------------'); x:=-4; repeat y:=abs(x)+2; writeln(y:20:1,' : ',x:5:1); x:=x+0.5; until x>4; end. |
Написать программу, которая определяет максимальное число из введенной последовательности положительных чисел. Завершение ввода – 0. |
Program M6; Var a{очередное число},m{макс.число}:integer; Begin M:=0; Repeat Writeln(‘введи число’);Readln(a); If a>m then m:=a; Until a=0; Writeln(‘max=’,m); end. |