Переключатель
Часто приходится делать выбор не между двумя, а между несколькими путями решения задачи.
Такую ситуацию называют переключателем.
Структура переключателя предусматривает выполнение i-ой цепочки операторов, если селектор принимает значение-i.
В Паскале переключатель реализуется оператором выбора:
Case (селектор) Of
значение-1: оператор-1;
значение-2: оператор-2;
значение-3: оператор-3;
…………………………
значение-n: оператор-n;
Else оператор-n+1;
End;
где Case - служебное слово “вариант”,
селектор - переменная или выражение любого порядкового или перечисляемого типа,
значение-1, значение-2,… - метки вариантов – конкретные значения или диапазоны значений селектора,
Else - служебное слово “иначе” (не обязательно).
Внимание! Перед словом Else можно ставить точку с запятой.
Действия оператора:
-
вычисляется значение селектора,
-
среди меток вариантов отыскивается это значение,
-
выполняется оператор, стоящий за найденной меткой,
-
осуществляется выход из переключателя,
-
если вычисленное значение селектора не найдено среди меток вариантов, то выполняется оператор, стоящий после слова Else, если оно есть.
Внимание! Переключатель всегда заканчивается служебным словом End, причем слова Begin для него нет.
Пример: чему будут равны значения переменных k и d после выполнения следующих операторов:
d := 5;
k := 4;
Case (k Mod d ) Of
2,3,5..8: d := k; метки вариантов могут перечисляться через запятую
1: ; это пустой оператор – программа ничего не выполняет
4,9: Begin если в одной ветви переключателя несколько операторов,
k := 0; то они заключаются в операторные скобки
d := 2;
End; перед Else ставится точка с запятой
Else d := 1; если значение селектора не совпадает ни с одной из меток
End;
В этом случае значение селектора 4 Mod 5 = 4 , поэтому переходим на ветвь с меткой варианта, равной 4, отсюда k = 0 и d = 2.
Таким образом,
-
в каждой ветви могут стоять по нескольку меток вариантов, разделенных запятыми: 2,3,
-
можно использовать интервалы данных: 5..8
-
в качестве оператора можно использовать пустой оператор
-
если после метки вариантов следует несколько операторов, то необходимо заключать в операторные скобки Begin…End
-
метки вариантов не должны повторяться.
Пример: написать программу с использованием переключателя, которая по введенному номеру месяца определяет количество дней в нем.
В данном случае у переключателя будут три ветви:
-
для месяцев с 30 днями
-
для месяцев с 31 днем
-
для месяца с 28 днями (вариант високосного года рассматривать не будем).
Program Mesjac;
Uses Crt;
Var Month: 1..12;
Begin
ClrScr;
Write(‘Введите номер месяца:’);
ReadLn(Month);
Case (Month) Of
4,6,9,11: WriteLn(’30 дней’);
1,3,5,7,8,10,12: WriteLn(’31 день’);
2: WriteLn(’28 дней’);
Else WriteLn(‘Такого месяца нет’);
End;
ReadLn;
End.
Часто встречающиеся ошибки программирования:
1. Использование в качестве селектора выражения логического типа:
Case (n > m) Of. . .
2. Использование в качестве селектора выражения вещественного типа:
Case (n + 2.5) Of. . .
3. Использование в качестве меток вещественных чисел:
Case (n + m) Of
0.5 : n:=1;
1.5 : n:=2;
Else n:=3;
End;
4. Использование двоеточия или точки с запятой после слова Of:
Case (n + m) Of:
. . . . . . . . .
5. Повторение меток:
Case (n + m) Of
0..3 : n:=1;
3, 4 : n:=2;
Else n:=3;
End;
6. Отсутствие в конце оператора слова End:
Case (n + m) Of
0..2 : n:=1;
3, 4 : n:=2;
Else n:=3;
7. Отсутствие точки с запятой в конце каждой ветви переключателя:
Case (n + m) Of
0..3 : n:=1
3, 4 : n:=2;
Else n:=3;
End;
Внимание! Перед веткой Else точка с запятой может ставиться, а может и не ставиться.
8. При задании меток интервалом используются не две, а три точки:
Case (n + m) Of
0...3 : n:=1;
3, 4 : n:=2
Else n:=3;
End;
Внимание! Перед словом End точка с запятой может ставиться, а может и не ставиться.
9. При перечислении меток используются не запятые, а точки с запятой:
Case (n + m) Of
0...3 : n:=1;
3; 4 : n:=2
Else n:=3;
End;
Циклы
Одним из самых ценных свойств компьютеров является их способность многократно повторять последовательность одинаковых или похожих действий - циклов. Являясь наиболее мощными структурами алгоритмических языков, циклы подразделяются на:
-
бесконечные циклы,
-
циклы с предусловием (циклы типа ПОКА),
-
циклы с постусловием (циклы типа ДО),
-
циклы с параметром (циклы типа ДЛЯ).