Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторна робота 1-5 (1 чт. СА-10).doc
Скачиваний:
3
Добавлен:
03.11.2018
Размер:
443.39 Кб
Скачать

0) Not, - ( унарний мінус ) операції інверсії

1) * , / , Dib, mod, and мультиплікативні операції

2) + , - , or, xor адитивні операції

3) = ,< > , >, >= , < , <= операції відношення

Дії одного пріоритету виконуються зліва направо.

Приклад. Обчислити логічний вираз в правій частині оператора присвоєння:

d: = not a and ( a or not b ) xor ( 5 < 2 ) де a: = true; b:=false;

    1. not b = not false = true;

    2. a or not b = a or true = true ( не залежно від а );

    3. ( 5 < 2 ) = false;

    4. not a = not true = false;

    5. not a and ( a or not b ) = false and false = false;

    6. not a and ( a or not b ) xor ( 5 < 2 ) = false xor false = false;

    7. d = false;

6.2.3. Умовний оператор if...Then...Else.

Умовний оператор if…then…else використовується в Паскаль-проограмі в тому випадку, коли вона розгалужується на дві гілки:

Виконується цей оператор таким чином, спочатку обчислюється логічний вираз ( операція порівняння ), який стоїть після службового слова if. Якщо результат обчислень TRUE, то виконується оператор, який стоїть після службового слова then, а якщо FALSE, то оператор, який стоїть після службового слова else. При цьому крапка з комою після першого оператора перед else не ставиться.

Обвідна стрілка на синтаксичній діаграмі показує, що умовній оператор може бути записаний в спрощеному вигляді, без службового слова else та оператора, який іде за ним, якщо в них немає потреби.

Приклад використання умовного оператора. Обчислити вираз у = х / ( 1 – х ), враховуючи те, що на 0 ділити не можна.

Program MyIf;

Var x, y: real;

Begin

ReadLn(x);

If x<>I then

Begin

y:=x/(1-x);

WriteLn(‘y=’,y:6:2);

End

Else WriteLn( ‘ Ділити на 0 не можна!’);

End.

Program MyIf;

В залежності від введеного числа ця програма виведе на дисплей або результат обчислень або попередження.

6.2.4. Складений оператор.

У тому випадку, коли в якійсь з гілок оператора if…then…else потрібно виконувати не один, а кілька операторів, їх виконують з допомогою конструкції begin… end поєднують в один оператор, який називають складеним. Таким чином складеним оператором називають перелік операторів, що виконуються одним за одним та обмежені службовими словами begin…end. В середині одного складеного оператора може бути скільки завгодно інших операторів, в тому числі і складених. Практично вся Паскаль-програма це один великий складений оператор. Службові слова begin…end у складених операторах виконують роль дужок у обчисленнях, показуючи, що спочатку повинні бути виконані всі оператори між ними, а тільки потім програма буде продовжуватись. Тому пару слів beginend називають також оператор ними дужками.

Наведемо приклад використання складених операторів та операторів if…then…else в програмі для підрахунку коренів квадратного рівняння, алгоритм якої наведено раніше в блок-схемі.