62

Змістовий модуль 2 Практичне заняття № 1

Тема: Множинний вибір. Оператор CASE.

Мета: Ознайомити студентів з поняттям множинного вибору. Розглянути призначення оператора вибору. Закріпити отримані знання на практиці.

Література

1. М.С.Львов, О.В.Співаковський. Основи алгоритмізації та програмування. Навчальний посібник – Херсон, 1997. – 122с.

2. Львов М.С., Співаковський О.В. Вступ до обєктно-орієнтованого програмування.–Херсон:ХДПУ.-240 с.

3. Фаронов В.В. Delphi 6.Учебний курс.-М.:Издатель Молгачева С.В.,-672с.,ил.

4. Т.Бадд.. Объектно-ориентированное программирование в действии / пер. с англ. - СПб.:Питер, 1997.- 464 с. ил.

5. http://www.programmersclub.ru/book/ - електронні підручники по Delphi

6. http://pitbooks.ru/delphi/ - електронні підручники по Delphi

Короткі теоретичні відомості

Інколи розгалуження в програмі слід зробити не на основі логічної умови, а на основі значення деякої змінної.

Наприклад

Якщо a = 1, то вивести “один”, якщо a = 2, то — “два”, … до п’яти. Якщо інше значення, то вивести “я не знаю”.

Використовуючи умовний оператор, матимемо запис:

if a = 1

then writeln(‘один’)

else if a = 2

then writeln(‘два’)

else if a = 3

then writeln(‘три’)

else if a = 4

then writeln(‘чотири’)

else if a = 5

then writeln(‘п’’ять’)

else writeln(‘я не знаю’);

Як бачимо, написання подібного коду є занадто громіздким і знижує ефективність роботи алгоритму. Аналогічним по функціоналу, але більш зручним та ефективним для більшої кількості вкладених умов є оператор Case.

case <змінна> of

<значення 1>: <дія 1>;

<значення 2>: <дія 2>;

…

<значення n>: <дія n>;

end;

Case, of, else, end - зарезервовані слова.

Змінна - може бути одним із стандартних типів: символьним типом, цілим числом, перераховуваних типом ... Замість значення може стояти простий оператор.

значення N - довільне значення, того ж типу, що й змінна.

оператор N - будь-які оператори.

Робота оператора вибору здійснюється наступним чином. Спочатку якщо необхідно обчислюється значення змінної. Потім шукається відповідність змінної значенням N. При рівності відбувається виконання оператора N і оператор case завершує свою роботу. Якщо збігів не знайдено то виконується оператор розташований після слова else. При відсутності оператора else, коли немає відповідності оператор case завершить свою роботу і буде виконаний

Якщо в якомусь блоці потрібно виконати декілька дій, то вони беруться між begin і end.

Так, описана вище задача матиме вигляд:

case a of

1: Writeln(‘один’);

2: writeln(‘два’);

3: writeln(‘три’);

4: Writeln(‘чотири’);

5: writeln(‘п’’ять’);

else writeln(‘я не знаю’);

end;

Варто відзначити, що If і Case хоч і є умовними операторами з однаковими можливостями, використовуються вони для різних цілей виключно по зручності. У якихось випадках набагато зручніше використовувати If, наприклад коли умови мають складну конструкцію, в інших випадках зручно використовувати Case, наприклад коли нам потрібно створити умову, що має кілька однакових за структурою умовних вкладень.