_інформ_2017
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
— якщо умова істинна, то виконується оператор1, а потім оператор2, який<br />
знаходиться в програмі після оператора розгалуження;<br />
— якщо умова хибна, то виконується оператор 2, а потім оператор , який<br />
знаходиться після оператора розгалуження.<br />
Скорочена форма оператора розгалуження виконується таким чином:<br />
― якщо умова істинна, то виконується оператор 1, а потім оператор , який<br />
знаходиться в програмі після оператора розгалуження;<br />
― якщо умова хибна, то виконується оператор , який знаходиться після<br />
оператора розгалуження.<br />
Примітка: перед else крапка з комою не ставиться.<br />
Оператор вибору CASE<br />
Якщо в програмі використовується декілька вкладених один в другий умовних<br />
операторів, то програма стає менш наочною і важкою для розуміння. В цьому випадку<br />
краще скористатися оператором вибору, який має вигляд<br />
CASEOF<br />
:;<br />
:;<br />
…………………………………..<br />
:;<br />
elseend;<br />
Вираз — це вираз порядкового типу, який називавають ще індексом<br />
вибору або селектором. Константи списку обовязково повинні бути того ж типу що і вираз.<br />
При цьому одні і ті ж константи повторюватися в списку не можуть. В якості виразу може<br />
бути змінна цілого, логічного, символьного типів або типу користувача. Дійсні і рядкові<br />
типи використовувати не можна.<br />
Список констант може бути заданий трьома способами:<br />
1. Перечисленням: 1,3,5,7,<br />
2. Діапазоном: ‘a’..’z’<br />
3. Перечисленням + діапазоном : 1..5,7,9,21..31<br />
Правила виконання оператора Case<br />
Cпочатку обчислюється значення виразу, а тоді виконується той оператор, перед яким<br />
стоїть та константа, яка рівна значенню виразу, якщо такої константи немає, то буде<br />
виконуватися оператор після слова else, якщо слово else відсутнє, то оператор вибору не<br />
виконується.<br />
Наприклад. Перевірити чи є ціле число парним.<br />
CASE m mod 2 of<br />
0: writeln(‘ парне ’);<br />
1:writeln(‘ непарне ’);<br />
49