Оператор является неделимым элементом программы, который дает возможность выполнять определенные алгоритмические действия. Отличием оператора, по отношению к другим элементам, является то, что под ним всегда подразумевается какое-то действие. В языке Паскаль операторы состоят из служебных слов. Операторы, используемые в программе, отделяются между собой и от других элементов программы символом (;). Все операторы языка Паскаль можно условно разбить на две группы :
- простые;
- структурированные.
Простые операторы - это операторы, не содержащие в себе других операторов. К ним относятся:
- оператор присвоения (:=);
- оператор процедуры;
- оператор безусловного перехода (GOTO).
Структурированные операторы - это операторы, которые содержат в себе другие операторы. К ним относятся:
- составной оператор;
- операторы условий (IF, CASE);
- операторы цикла (FOR, WHILE, REPEAT);
- оператор присоединения (WITH).
Простые операторы
Оператор процедуры
Оператор процедуры служит для вызова процедуры.
Формат: [имя_процедуры] (список параметров вызова);
Оператор процедуры состоит из идентификатора процедуры, непосредственно за которым в скобках расположен список параметров вызова. В Паскале имеются процедуры без параметров. В этом случае, при вызове, список параметров отсутствует. Выполнение оператора процедуры приводит к активизации действий описанных в ее теле. В языке Паскаль имеется два вида процедур:
- Стандартные, которые описаны в самом языке и являются принадлежностью языка;
- Процедуры пользователя, которые создает пользователь.
Для вызова стандартных процедур необходимо подключение в разделе USES имени модуля (библиотеки), где описана данная процедура. Ряд процедур, находящихся в модуле SYSTEM всегда подключается к программе автоматически и их подключение в разделе USES не нужно. Стандартные процедуры языка Паскаль - READ, WRITE, REWRITE, CLOSE, RESET.
READ ([файловая_переменная], [список_ввода])
READ (x,y)
Процедуры пользователя (нестандартные) должны быть созданы перед их использованием в программе и находятся либо в разделе описания самой программы, либо в отдельные программные единицы модуля. Если процедура находится в модуле, то имя этого модуля необходимо упомянуть в приложении USES.
Оператор безусловного перехода GOTO
Формат: GOTO [метка];
GOTO - зарезервированное слово в языке Паскаль. [метка] - это произвольный идентификатор, который позволяет пометить некий оператор программы и в дальнейшем сослаться на него. В языке Паскаль допускается в качестве меток использовать целое число без знаков. Метка располагается перед помеченным оператором и отделяется от него (:). Один оператор можно помечать несколькими метками. Они так же отделяются друг от друга (:). Перед тем как использовать метку в разделе оператора ее необходимо описать в разделе LABEL (раздел описания).
Действие GOTO передает управление соответствующему помеченному оператору. При использовании меток нужно руководствоваться следующими правилами:
- метка должна быть описана в разделе описаний и все метки должны быть использованы;
- если в качестве меток используются целые числа, их не объявляют.
Противоречит принципам технологии структурного программирования. Современные языки программирования не имеют в своем составе такого оператора, и в его использовании нет необходимости. Кроме того в современных компьютерах используется так называемый конвейерный способ. Если в программе встречается оператор безусловного перехода, то такой оператор ломает весь конвейер, заставляя создавать его заново, что существенно замедляет вычислительный процесс.
Структурированные операторы
Операторы условия IF
Условный оператор используется в программе для реализации алгоритмической структуры - ветвления. В данной структуре вычислительный процесс может продолжаться по одному из возможных направлений. Выбор направления обычно осуществляется проверкой какого-либо условия. Существует два вида структуры ветвления: структура вилка и обход.
В языке Паскаль условный оператор IF это средство организации ветвящегося вычислительного процесса.
Формат: IF [логическое_выражение] Then [оператор_1]; Else [оператор_2];
IF, Then, Else - служебные слова. [оператор_1], [оператор_2] - обыкновенные операции языка Паскаль. Часть Else является необязательной (может отсутствовать).
Оператор IF работает следующим образом: вначале проверяется результат логического выражения. Если результат Истина(TRUE), то выполняется [оператор_1], следующий за служебным словом Then, а [оператор_2] пропускается. Если результат Ложь(FALSE), то [оператор_1] пропускается, а [оператор_2] исполняется.
Если часть Else отсутствует, то оператор IF имеет не полную форму:
IF [логическое_выражение] Then [оператор];
В этом случае, если результат Истина(TRUE), то выполняется [оператор], если Ложь(FALSE), то управление передается оператору, следующему за оператором IF.
имеются 2 числа A и B. Найти максимальное число.
Составной оператор
Составной оператор - это последовательность произвольных операций в программе, заключенная в так называемые операторные скобки (Begin-End).
Формат: Begin [операторы]; End;
Составные операторы позволяют представлять группу операторов, как один оператор.
Оператор выбора CASE
Предназначен для реализации множественных ветвлений, поскольку оператор IF может реализовать всего два направления вычислительного процесса, использовать его для реализации множественных ветвлений не всегда удобно. Множественное ветвление реализуется оператором CASE.
Формат: CASE [ключ_выбора] OF
[константа_выбора_1]:[оператор_1];
[константа_выбора_2]:[оператор_2];
[константа_выбора_N]:[оператор_N];
ELSE [оператор];
CASE, OF, ELSE, END - служебные слова. [ключ_выбора] - это параметр одного из порядковых типов. [константы_выбора] - константы того же типа, что и ключ выбора, реализующие выбор. [оператор_1(N)] - обыкновенный оператор. ELSE может отсутствовать.
Оператор выбора работает следующим образом: до работы оператора определяется значение параметра ключ выбора. Этот параметр может быть либо выражен как переменная в программе, либо другим путем. Затем параметр ключ выбора последовательно сравниваем с константой выбора. При совпадении значения ключа выбора с одной из констант выбора, выполняется оператор, следующий за этой константой, а все прочие операторы игнорируются. В случае не совпадения ключа выбора ни с одним из констант, выполняется оператор, следующий за Else. Часто Else является не обязательной и в случае несовпадения ключа выбора ни с одной из констант выбора и при отсутствии Else, управление передается оператору, следующему за оператором CASE.
В операторе CASE нет явной проверки условия, характерного для оператора IF. В тоже время в неявном виде операция сравнения выполняется. CASE вносит диссонанс в программу на языке Паскаль, поскольку данные оператор завершается служебным словом End, которому нет парного Begin.
Составить алгоритм и программу задачи, моделирующей работу светофора. При вводе символа первой буквы цветов светофора, программа должна выводить сообщение о соответствующем цвете и действиях.
Программа работает следующим образом: с клавиатуры процедурой Read вводится символ буквы цвета светофора. Если введена буква ‘з’ соответствующая зеленому цвету, то в операторе CASE введено значение в списке выбора найдет константу выбора ‘з’ и будет выведено сообщение “Зеленый цвет, движение разрешено”. При вводе символа букв ‘к’ и ‘ж’ буду выведены аналогичные сообщения. При вводе любого другого символа будет выведено сообщение “Светофор не работает”, поскольку в этом случае работает часть Else, оператора CASE.
Операторы цикла
Циклической алгоритмической структурой считается такая структура, в которой некоторые действия выполняются несколько раз. В программировании имеются два вида циклических структур: цикл с параметром и итерационный цикл.
В цикле с параметром всегда имеются так называемые параметры цикла: X, X n , X k , ∆X. Иногда цикл с параметром называют регулярным циклом. Характерной чертой является то, что число циклов и повторений можно определить до выполнения цикла.
В итерационном цикле невозможно определить число циклов до его выполнения. Он выполняется до тех пор, пока выполняется условие продолжение цикла.
В языке Паскаль имеются три оператора, реализующих циклические вычислительные структуры:
- счетный оператор FOR. Он предназначен для реализации цикла с параметром и не может быть использован для реализации итерационного цикла;
- оператор цикла с предусловием WHILE;
- оператор цикла с постусловием REPEAT.
Последние два ориентированы на реализацию итерационного цикла, однако их можно использовать и для реализации цикла с параметром.
Оператор FOR
Формат: FOR [параметр_цикла] := [н_з_п_ц] To [к_з_п_ц] Do [оператор];
FOR, To, Do - служебные слова. [параметр_цикла] - параметр цикла. [н_з_п_ц] - начальное значение параметра цикла. [к_з_п_ц] - конечное значение параметра цикла. [оператор] - произвольный оператор.
Параметр цикла должен быть переменой порядкового типа. Начальное и конечное значения параметра цикла должны быть того же типа, что и параметр цикла.
Работу оператора рассмотрим на его алгоритме:
На первом шаге значение параметра цикла принимает [н_з_п_ц], затем осуществляется проверка параметр цикла меньше или равен [к_з_п_ц]. Это условие является условием продолжения цикла. Если выполнено, то цикл продолжает свою работу и выполняется [оператор], после чего параметр цикла увеличивается (уменьшается) на единицу. Затем с новым значением параметр цикла, проверяется условие продолжения цикла. Если оно выполняется, то действия повторяются. Если условие не выполняется, то цикл прекращает свою работу.
Оператор For существенно отличается от аналогичных операторов в других языках программирования. Отличия следующие:
- телом оператора For. Оператор может не выполниться ни разу, поскольку проверка условия продолжения цикла выполняется до тела цикла;
- шаг изменения параметра цикла постоянный и равен 1;
- тело цикла в операторе For представлено одним оператором. В том случае, если действие тела цикла требует более одного простого оператора, то эти операторы необходимо превратить в один составной оператор посредством операторных скобок (BEGIN-END);
- Параметр цикла может быть только переменой порядкового типа.
Пример использования оператора FOR: составить таблицу перевода рублей в доллары.
Оператор WHILE (оператор цикла с предусловием)
Формат: WHILE [условие] Do [оператор];
WHILE, Do - служебные слова. [условие] - выражение логического типа. [оператор] - обыкновенный оператор.
;
Оператор While работает следующим образом: вначале работы проверяется результат логического условия. Если результат истина, то выполняется оператор, после которого осуществляется возврат на проверку условия с новым значением параметров в логическом выражении условия. Если результат ложь, то осуществляется завершение цикла.
При работе с While надо обратить внимание на его свойства:
- условия, использованные в While, являются условием продолжения цикла;
- в теле цикла всегда происходит изменение значения параметра входящего в выражение условия;
- цикл While может, не выполнится ни разу, поскольку проверка условия в продолжение цикла выполняется до тела цикла.
Оператор REPEAT (оператор цикла с постусловием)
Формат: REPEAT [тело_цикла]; UNTIL [условие];
Оператор REPEAT работает следующим образом: сначала выполняются операторы тела цикла, после чего результат проверяется логического условия. Если результат ложь, то осуществляется возврат к выполнению операторов очередного тела цикла. Если результат истина, то оператор завершает работу.
Оператор Repeat имеет следующие особенности:
- в Repeat проверяется условие завершения цикла и если условие выполняется, то цикл прекращает работу;
- тело цикла всегда выполняется хотя бы один раз;
- параметр для проверки условия изменяется в теле цикла;
- операторы тела цикла не надо заключать в операторские скобки (BEGIN-END), при этом роль операторных скобок выполняют Repeat и Until.
Вычислить y=sin(x), где xn=10, xk=100, шаг равен 10.
Операторы цикла заставляют выполнять входящие в их состав операторы несколько раз.
В Паскале существует три вида операторов цикла: оператор цикла с параметром, оператор цикла с предусловием, оператор цикла с постусловием.
Оператор цикла с параметром
Формат оператора цикла с параметром:
for V:=E1 to E2 do S
где V - переменная порядкового типа, Е1, Е2 - выражения того же типа, S - оператор, называемый телом цикла. Выражения Е1 и Е2 вычисляются один раз при входе в цикл. Параметр V принимает сначала значение Е1 затем непосредственно следующее за ним (SUCC (V)) и т.д. до достижения Е2. При каждом значении V выполняется оператор S. Если в теле цикла необходимо выполнить несколько операторов, то их объединяют в один с помощью составного оператора. Если конечное значение Е2 меньше начального Е1, то оператор S не выполняется ни разу.
Оператор цикла с параметром применяется также в следующем виде:
for V:=Е1 downto E2 do S
В отличии от первого случая, V изменяется от Е1 до Е2, переходя от V к pred (V).
Отметим, что если V, Е1, Е2 типа INTEGER, то в первом случае это цикл с шагом +1, а во втором с шагом -1.
Оператор цикла с предусловием
Формат оператора цикла с предусловием:
где B - логическое выражение, S - оператор. Оператор S будет выполняться пока условие B будет истинно. Выполнение оператора цикла завершится когда выражение B впервые примет значение false.
Оператор цикла с постусловием
Формат оператора цикла с постусловием:
repeat S until B
где B - логическое выражение, S - оператор. Оператор S выполняется до тех пор, пока B не станет истинным. Оператор REPEAT выполняется по крайней мере один раз, так как проверка истинности условия B осуществляется после выполнения оператора S.
Служебные слова REPEAT и UNTIL уже играют роль скобок, поэтому операторные скобки BEGIN и END являются необязательными.
Примеры программ
В качестве примера использования операторов цикла рассмотрим программу вычисления факториала.
Программа 2.1.1. Цикл с параметром (шаг +1)
PROGRAM FACTORIAL1;
VAR I,N:INTEGER;
WRITE("ВВЕДИТЕ N");
READLN(N); F:=1;
FOR I:=1 TO N DO F:=F*I;
Программа 2.1.2. Цикл с параметром (шаг -1)
PROGRAM FACTORIAL2;
VAR I,N:INTEGER;
WRITE("ВВЕДИТЕ N");
READLN(N); F:=1;
FOR I:=N DOWNTO 1 DO F:=F*I;
WRITELN ("ФАКТОРИАЛ ОТ ",N," РАВЕН ",F)
Программа 2.2. Цикл с предусловием
PROGRAM FACTORIAL3;
VAR I,N:INTEGER;
WRITE("ВВЕДИТЕ N");
READLN(N); F:=1; I:=1;
WHILE I<=N DO
WRITELN ("ФАКТОРИАЛ ОТ ",N," РАВЕН ",F)
С помощью этого оператора переменные в Турбо Паскале могут получать свои значения программным путем (то есть не с клавиатуры). Формат:
<идентификатор (имя) переменной>:= <выражение>
Система сначала вычисляет значение выражения, затем присваивает его переменной.
Составной оператор.
Составной оператор – это последовательность любых операторов Турбо Паскаля, заключенная в операторные скобки begin и end. Например:
begin a:=5; write (‘a=’,a); end;
Среди операторов составного оператора могут быть другие составные операторы, то есть допускается любая глубина их вложения. Например:
Операторы условного перехода.
Они существуют для организации ветвлений в зависимости от истинности или ложности некоторого условия. Таких операторов два: полный условный оператор и неполный условный оператор.
Полный условный оператор
Реализует алгоритмическую конструкцию «полная развилка»:
Его формат:
if <логическое выражение> then <оператор 1> else <оператор 2>
If, then, else – служебные слова «если», «тогда», «иначе». Перед словом else точка с запятой не ставится. Оператор 1 и оператор 2 могут быть как простыми операторами, так и составными. Составной оператор следует заключать в операторные скобки begin и end.
Действия условного оператора: если логическое выражение имеет значение true, то выполняется оператор 1, если логическое выражение имеет значение false, то выполняется оператор 2.
Неполный условный оператор
Реализует алгоритмическую конструкцию «неполная развилка»
Его формат:
if <логическое выражение> then <оператор >
If, then – служебные слова «если», «тогда». Оператор может быть как простыми оператором, так и составным.
Действия условного оператора: если логическое выражение имеет значение true, то выполняется оператор, если логическое выражение имеет значение false, то условный оператор пропускается и выполняется оператор, следующий за ним.
Условные операторы (полный и неполный) могут иметь вложенную конструкцию, то есть после слов THEN или ELSE опять используется условный оператор. Служебное слово ELSE всегда относится к ближайшему слева слову THEN.
В состав условного оператора может входить один простой оператор. Если по смыслу задачи требуется вставить несколько операторов, то они объединяются в составной.
Замечание: после слова THEN не может сразу записываться новый условный оператор, а после ELSE – может. Например:
В тех случаях, когда требуется проверить несколько условий, применяются сложные условные операторы. В них используются логические операции and, not, or. Например:
if ((x>3) and (y>3) and (z>3)) then ...
Операторы организации цикла.
Цикл – это многократно повторяемый участок программы. Для организации цикла в Паскале используются три оператора: оператор с предусловием, оператор с постусловием и оператор с параметром.
Оператор цикла с предусловием
Этот оператор реализует блок-схему цикла с предусловием:
Его формат:
While <логическое выражение> Do <тело цикла>
While («пока»), Do («делать») - служебные слова.
Действия оператора: пока логическое выражение имеет значение true, выполняется тело цикла; как только логическое выражение принимает значение false, действие оператора заканчивается и выполняется оператор, следующий за ним. Значение логического выражения проверяется перед телом цикла. Если логическое выражение ложно с самого начала, то тело цикла сразу опускается.
Если тело цикла содержит последовательность операторов, то говорят, что оно образует составной оператор, в начале и в конце которого надо писать операторные скобки Begin и End.
Если же тело цикла - один оператор (не составной), то операторных скобок не требуется. Тогда транслятор считает, что тело цикла заканчивается на ближайшем знаке «;». В Паскале нет специальных слов для обозначения начала цикла и конца цикла. На все случаи есть универсальные слова Begin и End.
Оператор цикла с постусловием
Этот оператор реализует блок-схему цикла с постусловием:
Его формат:
Repeat <тело цикла> Until <логическое выражение>
Repeat («повторять»), Until («до тех пор») - служебные слова.
Тело цикла может быть как одиночным, так и составным оператором, однако употребления Begin и End не требуется, поскольку сами слова Repeat и Until выполняют роль операторных скобок.
Действия оператора: выполняется тело цикла, затем проверяется значение логического выражения. Если логическое выражение имеет значение false, то опять выполняется тело цикла. Так продолжается до тех пор, пока логическое выражение не примет значение true. То есть тело цикла повторяет свое выполнение, если условие ложно. Повторение кончается, когда условие станет истинным. Действие оператора заканчивается и выполняется оператор, следующий за ним. Значение логического выражения проверяется после тела цикла.
Замечания:
Перед каждым выполнением тела цикла логическое выражение должно иметь конкретное значение.
Тело цикла должно иметь хотя бы один оператор, влияющий на значение логического выражения, иначе цикл будет выполняться бесконечно.
В конце концов логическое выражение должно принять значение, заканчивающее цикл.
Оператор цикла с параметром
Этот оператор реализует блок-схему цикла со счетчиком. Его формат:
for <параметр цикла>:= <арифметическое выражение 1> to <арифметическое выражение 2> do <тело цикла>
for < параметр цикла >:= < арифметическое выражение 1> downto < арифметическое выражение 2> do <тело цикла>
Параметр цикла – это переменная любого типа, кроме real.
Арифметические выражения 1 и 2 должны иметь тот же тип, что и параметр цикла. Тело цикла – любой оператор Паскаля (простой, сложный, составной).
Действия оператора: параметру цикла присваивается значение арифметического выражения 1. Если оно меньше (для for - to - do ) или больше (для for - downto - do ) значения арифметического выражения 2, то выполняется тело цикла. Затем параметр цикла увеличивается (уменьшается) на величину, указанную в теле цикла. Потом он снова сравнивается с арифметическим выражением 2. И так до тех пор, пока параметр цикла не станет больше (меньше) значения арифметического выражения 2. Далее оператор цикла заканчивает работу и выполняется следующий за ним оператор.
Если параметр цикла имеет тип integer, то при слове to шаг изменения параметра равен единице (при downto шаг равен -1).
Этот оператор имеет ограниченное применение, то есть его можно использовать только в тех случаях, когда известно число повторений тела цикла
Оператор цикла с параметром (цикл FOR)
Общий вид:
for <пар .>:=<n1 > to <n2 > do <оп .> ;
<пар .> – параметр цикла, переменная дискретно-упорядоченного типа , как правило типа integer,
<n1 > – выражение того же типа, начальное значение параметра, присваиваемое ему на входе в цикл,
<n2 > – выражение того же типа, конечное значение параметра,
<оп. > – оператор, выполнение которого повторяется до тех пор, пока параметр цикла, увеличиваясь после каждого шага на единицу, не превысит <n2 >.
Иными словами, цикл for действует следующим образом: вначале вычисляется параметр <n1 > и осуществляется присваивание <пар .>:=<n1 >. После этого циклически повторяется (для параметра целого типа):
1) проверка условия <пар
.>¹
2) выполнение оператора <оп .>;
3) увеличение переменной <пар .> на единицу.
Замечание 1: Переменная <пар .>, а также выражения <n1 > и <n2 > не могут быть типа real , так как он не является дискретно-упорядоченным.
Замечание 2: В качестве <оп .> может присутствовать только один оператор . В случае, если повторяться должны сразу несколько операторов, то их надо сформировать в блок с помощью операторных скобок begin и end.
Блок-схема: цикла FOR :
Другая форма оператора FOR:
for <пар .>:=<n2 > downto <n1 > do <оп .> ;
В этом случае оператор <оп .> повторяется при уменьшении параметра цикла на единицу. Цикл завершается при достижении условия <пар .>=<n1 >–1.
Блок-схема:
Оператор цикла с предусловием (цикл WHILE)
Общий вид:
while <условие > do <оп.> end;
<условие > – выражение логического типа,
<оп .> – оператор.
Действие . Циклически повторяется:
1) проверка выражения <условие >. Если результат есть false (т.е. <условие > ложно), то цикл завершается;
2) в случае, если <условие > истинно, выполняется оператор <оп .>.
Замечание: Как и в цикле FOR, в качестве <оп .> может присутствовать только один оператора. Если операторов, которые должны повторяться, больше одного, то они должны быть сформированы в блок с помощью операторных скобок begin и end.
Оператор цикла с постусловием (цикл REPEAT)
Общий вид :
<оп.1 >;
<оп.2 >;
…………
<оп.N >;
until <условие >;
<оп.1 >, <оп.2 > ,…, <оп.N > – операторы,
<условие > - выражение логического типа.
Действие. Последовательность операторов <оп.1 >, <оп.2 > ,…, <оп.N > выполняется хотя бы один раз, после чего проверяется <условие >. Если результат есть true, то цикл завершается. В противном случае опять выполняется последовательность операторов, <оп.2 > ,…, <оп.N > , затем снова проверяется условие и так далее.
Блок-схема:
Замечание 1. Конструкция repeat … until позволяет повторять сразу несколько операторов, поэтому здесь не требуется (как в случае FOR и WHILE) формировать операторы в блок.
Замечание 2 . <условие > в цикле WHILE и <условие > в цикле REPEAT имеют противоположный смысл: в цикле WHILE <условие > есть условие продолжения цикла, а в цикле REPEAT <условие > есть условие окончания цикла.
Пример 1. Дано целое n . Вычислить сумму
Решение. Для обозначения суммы вводится переменная s , которой изначально присваивается значение 0. Затем организуется цикл, на каждом шаге которого к s прибавляется очередное слагаемое. Поскольку известны границы изменения k (от 0 до n ), то в качестве оператора цикла удобнее всего взять цикл FOR с параметром k и границами 1 и n.
Программа:
var k,n:integer; s:real;
writeln(¢введите n¢);
for k:=1 to n do
s:=s+k/(1+k*k*k);
writeln(¢s=¢,s)
Пример 2 . Сумма тех же слагаемых, что и в примере 1, только вместо n даётся вещественное число (степень точности). Требуется суммировать до тех пор, пока очередное слагаемое не станет меньше .
Решение. В этом случае число слагаемых заранее не известно, зато известно условие, при котором следует закончить суммирование. Поэтому удобнее использовать цикл с выходом по условию, например REPEAT. Для обозначения очередного слагаемого удобно ввести переменную а .
Программа:
var k,eps,s,a:real;
writeln(¢введите eps¢);
until abs(a) writeln(¢s=¢,s) Пример3.
Даны n, m.
Вычислить сумму Решение.
Считается сумма по двум параметрам, следовательно используется конструкция «цикл в цикле». Внутренний цикл считает сумму по j при фиксированном i, внешний – сумму по i. Программа:
var i,j,m,n:integer; writeln(¢введите m,n¢); for i:=2 to m do for j:=1 to n do s:=s+1/(i*i+j*j*j); writeln(¢s=¢,s) Пример 4
. Даны х,n.
Вычислить сумму Решение: Здесь слагаемое имеет более сложную структуру – оно содержит факториал k
!=1*2*3*…*k
, вычисление которого есть само по себе цикл, степень , операции для вычисления которой в данной версии паскаля нет, и «мигалку» 14.
Операторы циклов в Паскале: с предусловием,
постусловием и с параметром.
В
большинстве задач, встречающихся на
практике, необходимо производить
многократное выполнение некоторого
действия. Такой многократно повторяющийся
участок вычислительного процесса
называется циклом. Если
заранее известно количество необходимых
повторений, то цикл называется
арифметическим
.
Если же количество повторений заранее
неизвестно, то говорят об итерационном
цикле. В
итерационных циклах производится
проверка некоторого условия, и в
зависимости от результата этой проверки
происходит либо выход из цикла, либо
повторение выполнения тела цикла. Если
проверка условия производится перед
выполнением блока операторов, то такой
итерационный цикл называется циклом с
предусловием (цикл "пока"), а если
проверка производится после выполнения
тела цикла, то это цикл с постусловием
(цикл "до"). Особенность
этих циклов заключается в том, что тело
цикла с постусловием всегда выполняется
хотя бы один раз, а тело цикла с предусловием
может ни разу не выполниться. В зависимости
от решаемой задачи необходимо использовать
тот или иной вид итерационных циклов. Арифметические
циклы (циклы с параметром)
Синтаксис: for
<пар_цикла>
:= <нач_значение> to <кон_значение>
do <оператор>
for
<пар_цикла>
:= <нач_значение> downto <кон_значение>
do <оператор>
Оператор
for вызывает оператор, находящийся после
слова do, по одному разу для каждого
значения в диапазоне от значения 1 до
значения 2. Переменная
цикла, начальное и конечное значения
должны иметь порядковый тип. Со словом
to, значение переменной цикла увеличивается
на 1 при каждой итерации цикла. Со словом
downto, значение переменной цикла уменьшается
на 1 при каждой итерации цикла. Не следует
самостоятельно изменять значение
управляющей переменной внутри цикла. Как
и в случае использования оператора
условного перехода, следует помнить,
что синтаксис языка допускает запись
только одного оператора после ключевого
слова do, поэтому, если вы хотите в цикле
выполнить группу операторов, обязательно
надо объединить их в составной оператор
(окаймить операторными скобками begin ...
end). Пример
2.
Латинский
алфавит
.
for
ch:="A" to "Z" do Writeln(ch); Пример
3. Использование цикла с downto.
for
i:=10 downto 1 do WriteLn(i); Пример
4. Использование составного оператора.
for
x:=1 to 10 do begin WriteLn("f(",x,")=",y); Итерационные
циклы с предусловием
Синтаксис: while
<условие>
do <оператор>
Оператор
после do будет выполняться до тех пор,
пока логическое выражение принимает
истинное значение (True). Логическое
выражение является условием возобновления
цикла. Его истинность проверяется каждый
раз перед очередным повторением оператора
цикла, который будет выполняться лишь
до тех пор, пока логическое выражение
истинно. Как только логическое выражение
принимает значение ложь (False), осуществляется
переход к оператору, следующему за
while. Выражение
оценивается до выполнения оператора,
так что если оно с самого начала было
ложным (False), то оператор не будет выполнен
ни разу. Пример
.
while
x > eps do x:=x/2; Итерационные
циклы с постусловием
Синтаксис: <оператор>;
<оператор>;
<оператор>
until
<условие>
Операторы
между словами repeat и until повторяются,
пока логическое выражение является
ложным (False). Как только логическое
выражение становится истинным (True),
происходит выход из цикла. Так
как выражение оценивается после
выполнения операторов, то в любом случае
операторы выполнятся хотя бы один раз. WriteLn("Введите
положительное число");
