7.3. Оператор выбора (Case)
Предназначен для выбора одного из нескольких альтернативных путей. Аналогичен по действиям оператору условного перехода – IF.
Общая форма записи:
Case I of:
m1: <оператор 1>;
m2: <оператор 2>;
.
.
.
mn: <оператор n>;
end.
Выполение:
Если селектор принимает значении «m1», то выполняется <оператор 1>.
7.4. Оператор «Цикла с параметром (For)»
Предназначен для повторения одного простого или составного оператора, заранее известного количество раз.
Общая форма записи:
For <параметр цикла>:=<начальное значение параметра> to <конечное значение параметра> do <оператор>
Параметр цикла может быть величиной целого и символьного, но не вещественного типов.
З
амечание:
а) Параметр цикла принудительно в цикле изменить нельзя!
б)После выхода из цикла параметр – неопределен.
в)При использовании в заголовке вместо to downto параметр уменьшения на 1.
Достоинства:
а) краткость записи
Недостатки:
а)Возможность
изменения цикла только на
№1.Вывести элемент латинского алфавита
Var
I:char;
Begin
For i:=’A’ to ‘Z’ do
Write (i);
Readln;
End.
7.5. Оператор «Цикла с предусловием пока(while)»
While – предназначен для повторения одного оператора, пока истинно логическое условие:
While <логическое выражение> do
<оператор>
В цикле выполняется только один оператор(без begin).
7.6.Оператор цикла с постусловием пока не(repeat…until).
Repeat – предназначен для повторения нескольких операторов, до тех пор, пока логическое выражение не станет истинной( пока условие ложно).
Repeat
<оператор 1>;
<оператор 2>;
.
.
.
<оператор n>;
Until<>
Выполнение:
После заголовка REPEAT последовательно выполняется операторы до слова UNTIL. Далее вычисленное значение логического выражения. Если оно ложно, то цикл происходит повторно. Если истинно – выход из цикла.
8. Сравнительная характеристика операторов цикла (while & repeat)
-
WHILE
REPEAT…UNTIL
1.C предусловием
1.С постусловием
2.Операторы цикла выполняются, когда логическое условие является истинным (значение логического выражения TRUE)
2. Операторы цикла выполняются «пока» логическое выражение «не» станет истинным.
(т.е. значение логического выражения FALSE)
3.По определению выполняет повторение 1-ого оператора, поэтому в случае необходимости используется составной оператор (begin…end)
3. Имеется явный признак окончания цикла – оператор UNTIL, поэтому использование составного оператора не требуется
№1. Составить программу вычисления факториала – n!
-
1)Для FOR (to)
Var F,I,N: integer;
….
F:=1;
For i:=2 to n do
F:=F*I;
2)Для FOR (downto)
Var F,I,N:integer;
….
F:=1
For i:=N downto 1 do
F:=F*i
3)Для While
Var F,I,W:integer;
F:=1; i:=2;
While i<=n do
Begin
F:=F*I;
I:=i+1;
End;
4)Для Repeat – Until
Var F,I,N:integer;
F:=1;i:=2;
Repeat
F:=F*i
Inc(i);
Until i>n
End.