Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
СР 3.doc
Скачиваний:
0
Добавлен:
27.08.2019
Размер:
101.38 Кб
Скачать

Оператор варіанта.

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

Загальний вигляд оператора варіанта :

CASE (ВИРАЗ) OF

(список міток варіанта) : (оператор) ;

...

(список міток варіанта) : (оператор) ;

END.

Як змінну-вираз можна використовувати змінну цілого або символьного типу. Виконання оператора варіанта починається з обчислення значення виразу. Потім для виконання вибирається оператор, одна з міток якого збігається з отриманим значенням. Після виконання цього оператора керування передається до оператору, що випливає за оператором варіанта.

Приклад. (РОЗГАЛУЖЕНА ПРОГРАМА)

Скласти блок-схему алгоритму, написати та відладити програму на мові TURBO-PAS :

bx-tg bx , якщо bx < 1

Y= 1.5 , якщо bx = 1

bx+ln bx , якщо bx > 1 , b=1.5

PROGRAM W2(INPUT, OUTPUT) ;

VAR B, X, Y : REAL;

BEGIN

b:=1.5;

WRITELN(‘X=’);

READ(X);

IF b*x < 1 THEN Y:= b*x-sin (b*x)/cos (b*x)

ELSE IF b*x = 1 THEN Y:=1.5

ELSE IF b*x> 1 THEN Y:= b*x+ln(b*x) ;

WRITELN (‘Y=’, Y:6:2);

END.

АЛГОРИТМІЧНА МОВА.

Алг W2 (ОБЧИСЛЕННЯ Y)

Арг в, х

Рез Y

Поч

B:=1.5;

Ввести X

Якщо bx < 1 то Y:= b*x-sin (b*x)/cos (b*x)

Інакше якщо bx = 1 то Y:= 1.5

Інакше якщо bx > 1 то Y:= b*x+ln(b*x)

Друк Y

Кін.

Контрольнi питання:

  1. Яка структура програми на мов і Turbo Pascal ?

  2. Як оформлюється розділ операторів ?

  3. Як називаються об’єкти, якими оперує Turbo Pascal ?

  4. Які є типи даних у мові Turbo Pascal ?

5. Які є правила використання виразів ?

6. Як розташовуються операції ?

7. Як працює вказівка присвоювання ?

8. Який є стандартний файл введення ?

9. Який є стандартний файл виведення ?

10. Чим відрізняється оператор READ від оператора READLN ?

11. Чим відрізняється оператор WRITE від оператора WRITELN ?

12. Що таке умовний оператор?

13. Види умовного оператора.

14. Що таке оператор варіанта?

Література: О.В. Ярмуш, М.М. Редько «Iнформатика і комп’ютерна техніка»

9