Оператор выбора (case)

Предназначен для ветвления программ на 2 или несколько направлений.

Case < ключ выбора> of < список выбора> else P end;

< ключ выбора> - идентификатор целого или символьного типа,

< список выбора> - включает в себя две или более конструкций следующего вида:

< константа выбора>: < оператор>;

< константа выбора> - это идентификатор того же типа, что и < ключ выбора>.

Пример. Для 100 целых значений x рассчитать значение .

Составить два варианта программ: с помощью условного оператора if и c помощью оператора выбора Case.

Технологические операции программирования приведены в таблице

Таблица

N	Технологическая операция	Выполнение
1.	Постановка задачи	Для 100 целых значений x рассчитать значение y,
2.	Математическое описание	Для определения четности воспользуемся оператором mod – остаток целочисленного деления: Если x mod 2=0, то x-четное Если x mod 2=1, то x-нечетное
3.	Разработка структограммы
4.	Написание программы
4.1	С помощью оператора If	Program P4; Var x, y: integer; Begin For x: =1 to 100 do Begin If x mod 2 =0 then y: =2*x else y: =2+x; Writeln(x, y); End; End.
4.2	С помощью оператора Case	Program P4; Var x, y: integer; Begin For x: =1 to 100 do Begin Case x mod 2 of 0: y: =2*x; 1: y: =2+x; end; Writeln(x, y); End; End.
5.	Отладка и получение результатов	Выполнить самостоятельно