Розробили: Волик О. Ф.,Кащеєва О.В., Мормуль М. Ф. 26.02.2013

Лабораторна робота № 2

Тема. Логічні операції. Умовні конструкції мови Pascal

Мета: навчитися обчислювати значення логічних виразів і складати алгоритми з розгалуженнями.

Порядок виконання роботи

1. Ознайомитися з інструкцією до лабораторної роботи, опрацювати і законспектувати теоретичний матеріал у звіт з лабораторної роботи.

2. Засвоїти прийоми роботи з умовними операторами.

3. Виконати завдання на ПЕОМ.

4. Оформити звіт з лабораторної роботи.

5. Відповісти на запитання викладача за темою роботи.

Зміст звіту

1. Номер лабораторної роботи, тема, мета.

2. Стислий конспект теоретичного матеріалу.

3. Формулювання завдань до лабораторної роботи.

4. Звіт про виконання кожного з пунктів завдання і машинні результати виконання.

5. Висновки.

6. Підпис, дата.

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

Оператор безумовного переходу.

Оператор безумовного переходу (goto) означає «перейти до» і виконує передачу керування до оператора, відзначеного міткою. Послідовний порядок виконання операторів при цьому буде порушений. Мітка може бути ідентифікатором або числом. Синтаксис опису оператора безумовного переходу: goto <мітка>;

Мітка, на яку передається керування, повинна бути описана в розділі опису міток блоку, де вона використовується і область дії мітки є блок, у якому вона описана за допомогою ключового слова Label (Label Мітка;).

Оператор goto використовується для передчасного виходу із структурного оператора або при обробці помилок. В інших випадках застосовувати goto не рекомендується.

Порожній оператор.

Порожній оператор не вміщує ніяких символів і не виконує ніяких дій. Він може бути розташований у будь-якому місці програми, де синтаксис мови допускає наявність оператора. Про його присутність вказує лише один символ «крапка з комою»(;). Порожній оператор може бути позначений міткою. Порожній оператор використовується для організації виходу із середини програми або складеного оператора, він надає можливість передачі керування на кінець складеного оператора.

У мові Pascal передбачені такі операції відношення:

Математичний запис	Назва операції	Запис на Pascal
=	Дорівнює	=
	Не дорівнює	<>
<	Менше	<
>	Більше	>
	Не більше	<=
	Не менше	>=

Відношенням називають два вирази, поєднані знаком відношення (див. таблицю). Відношення приймає логічне значення TRUE або FALSE.

Логічні операції AND (кон’юнкція), OR (диз’юнкція ), XOR (виключна диз’юнкція ), NOT (заперечення) дають можливість записувати та обчислювати більш складні логічні вирази. Вони також повертають логічні значення згідно з так званою таблицею істинності:

Тип операндів		Операція
X	Y	X AND Y	X OR Y	X XOR Y	NOT X
TRUE	TRUE	TRUE	TRUE	FALSE
TRUE	FALSE	FALSE	TRUE	TRUE	FALSE
FALSE	TRUE	FALSE	TRUE	TRUE	TRUE
FALSE	FALSE	FALSE	FALSE	FALSE

Приклад

Подвійна нерівність вигляду

н а мові Pascal запишеться так: (a<=x)and(x<=b)and(c<=y)and(y<=d). Повертатиметься істина, якщо всі відношення у дужках виконуватимуться водночас.

Умовний оператор IF...THEN...ELSE (якщо – то – інакше) має структуру:

IF <Умова>THEN<Оператор1> ELSE<Оператор2>;

Умовний оператор призначений для організації процесу обчислень залежно від виконання деякої логічної умови. Якщо умова виконується, то виконується оператор1, інакше – оператор2.

Якщо необхідно виконати після ключового слова THEN або після ELSE більше одного оператора, слід записати їх в операторних дужках BEGIN...END;. Під умовою тут розуміють логічне значення TRUE або FALSE, що подане у вигляді логічної константи, змінної або логічного виразу, наприклад: IF x>=0 THEN writeln ('Додатне значення або нуль') ELSE writeln ('Від’ємне значення'); Якщо умову буде виконано, виведеться текст “Додатне значення або нуль”, інакше виведеться “Від’ємне значення”.

Знак ; пишеться після закінчення оператора, але не перед альтернативною гілкою ELSE! Альтернативну гілку ELSE можна не писати, якщо в ній немає потреби. У такому “скороченому” умовному операторі у випадку невиконання умови нічого не відбувається, а виконується наступний за ним оператор, наприклад: IF B=13 THEN WRITELN ('Будьте обережні!'); Write ('Сьогодні B=',B); Попередження виведеться тільки при виконанні умови (B=13), а наступний оператор завжди спрацює.