Лабораторная работа №6

Тема: Программирование разветвляющихся вычислительных процессов. Оператор CASE.

Цель: Разработать схему и написать программу с использованием оператора выбора CASE.

Оператор выбора CASE.

Инструкция Case используется для выбора одного из нескольких направлений дальнейшего хода программы (последовательности инструкций, которые могут быть выполнены). Эта структура обеспечивает выбор одного из ряда возможных действий, в зависимости от значения, которое принимает переменная-селектор (условие). Выбор варианта действия осуществляется во время выполнения программы в зависимости от равенства значения переменной-селектора константе, указанной перед группой инструкций. В качестве переменной-селектора можно использовать переменную скалярного типа (integer или char). Конструкция имеет следующий формат:

CASE переменная-селектор OF

константа 1: оператор 1;

константа 2: оператор 2;

- - - - - - - - - - - - - - - - - - - -

константа N: оператор N

ELSE

оператор;

END;

Эта конструкция имеет и укороченный формат:

CASE переменная-селектор OF

константа 1: оператор 1;

константа 2: оператор 2;

- - - - - - - - - - - - - - - - - - - - -

константа К: оператор К

END;

Пример 6.1. Вводится число от 0 до 21. Вывести сообщение: число меньше 10, число больше 10, число равно 10. При вводе числа больше 20 или меньше 0 должно выводиться сообщение «Ошибка ввода».

Program razv; {заголовок программы}

uses crt; {указание библиотечных модулей}

var a: integer; {раздел описания переменных}

begin {начало раздела операторов}

clrscr; {команда очистки экрана}

write('Введите число а='); {вывод текста на экран}

readln(а); {ввод значения а}

case a of

0..9: writeln(‘число меньше 10’);

11..20: writeln(‘число больше 10’);

10: writeln(‘число равно 10’);

else

writeln(‘Ошибка ввода’)

end;

end.

Варианты заданий

1. Вводится число от 1 до 4, определяющее пору года. Дать название этой

поры года (1 — зима, 2 — весна, 3 — лето, 4 — осень).

2. Вводится число от 1 до 7, определяющее день недели. Дать название

этого дня (1 — понедельник, 2 — вторник,..., 7 — воскресенье).

3. Вводится числа 12, 1, 2, определяющие зимний месяц года. Дать название

этого месяца года (1 — январь, 2 — февраль, 12 — декабрь).

4. Вводится число от 1 до 10. Дать название этого числа (1 — один, 2 — два,

..., 10 — десять).

5. Дано натуральное число A (A< 20), определяющее сумму денег в рублях.

Дать для этого числа наименование: " рубль", " рубля", " рублей".

6. Дано натуральное число N (N< 100), определяющее возраст человека в

годах. Дать для этого числа наименование: " год", " года", " лет".

7. Вводится число от 1 до 12, определяющее месяц года. Дать название

этого месяца года (1 — январь, 2 — февраль,..., 12 — декабрь).

8. Вводится число от 1 до 20. Дать название этого числа (1 — один, 2 — два,

..., 20 — двадцать).

9. Вводится числа 3, 4, 5, определяющие весенний месяц года. Дать

название этого месяца года (3 — март, 4 — апрель, 5 — май).

10. Вводится число от 1 до 10. Дать название этого числа (1 — один, 2 — два,

..., 10 — десять).

11. Вводится число от 2 до 10. Вывести сообщение: четное или нечетное

введенное число.

12. Вводится число от – 10 до 10. Вывести сообщение: введенное число

больше 0, меньше 0 или равно 0.

13. Вводится номер месяца (1, 2, …, 12). Вывести количество дней в

указанном месяце, при ошибочном вводе должно выводиться сообщение

«Ошибка ввода».

14. Написать программу, которая запрашивает у пользователя номер дня

недели и выводит одно из сообщений: «Рабочий день», «Суббота» или

«Воскресенье».

Контрольные вопросы

1. Как в Паскале записывается оператор выбора?

2. Для чего предназначен оператор выбора?

3. Что такое полная и сокращенная записи оператора выбора?

4. Какого типа должна быть переменная, значения которой выбирают с помощью оператора CASE?