Переключатель
Часто приходится делать выбор не между двумя, а между несколькими путями решения задачи.
Такую ситуацию называют переключателем.
Структура переключателя предусматривает выполнение 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;
Циклы
Одним из самых ценных свойств компьютеров является их способность многократно повторять последовательность одинаковых или похожих действий - циклов. Являясь наиболее мощными структурами алгоритмических языков, циклы подразделяются на:
бесконечныециклы,
циклы с предусловием(циклы типаПОКА),
циклы с постусловием(циклы типаДО),
циклы с параметром(циклы типаДЛЯ).