Case Value1

<оператор1>

…………….

Case Value n

<оператор n>

Case Else <оператор n+1>

End Select

Після кожного оператора Case вказуються значення або діапазон значень, яких може набувати змінна TestValue. Це значення Value1…Value n. Саме від них залежатиме, за якою групою операторів буде відбуватись обчислення у програмі. Якщо ж значення змінної TestValue не співпаде з жодним значенням Value n, то буде виконуватись група операторів, розташована на гілці Case Else.

Виконання програм з розгалуженнями в покроковому режимі.

If Логічний_вираз Then Оператор1 Е lse Оператор2

або складніше If Логічний_вираз Then

Група_операторів

End If

У першому випадку оператор може бути тільки один. У другому – скільки завгодно (у тому числі й один).

Наприклад:

1. If (a = b) And (c <> d) Then

pa = d

pb = 20

End If

Дужки тут не обов’язкові, але вони підвищують читабельність коду.

2. Записати оператор, що реалізує таку дію:

змінній А присвоїти значення True, якщо X не належить проміжку (5;10) і False, якщо 5<X<10.

If (х < 5) And (х > 10) Then А = True Else A = False

3. Записати оператор, що реалізує таку дію:

If (А < 5) Then В = А+1 Else: В = А*2

4. Чому дорівнює значення змінної С після

виконання команди:

Оскільки умова 2≥6

не виконується, тоді С=12.

5. А=–8. Чому дорівнює А після виконання даного оператора?

Select Case А mod 10

Case Is < 3: A = A*2 Оскільки 8 mod 10 = 8

Case 3 To 5: A =A+10 (остача від ділення 8 на 10),

Case Else: A= 15 тоді перевіряються умови:

End Select 8<3 та 8є[3;5], які не

виконуються, тому А=15.

Завдання для самостійного виконання:

1. Записати логічні вирази:

а) число а більше від 10 __________________________________

б) число а належить відрізку [7;9]__________________________

в) хоча б одне з чисел a,b – додатне_________________________

г) число k від’ємне або більше 2 ___________________________

д) число у кратне 4_______________________________________

2. Чому дорівнює Y після виконання заданого оператора, якщоX=10?

If x<0 then y=x

elseIf x<=5 then y=x^2

else: y = 2*x

End If

End If

Y=________________

3. Нехай А=15, В=5. Які значення приймуть змінні А і В після виконання оператора:

If A < 5 Then В = А + 1

ElseIf A < 10 Then В = A * 2

Else: В = A + 10

End If

End If

А=______ В=_______

4. Як записати оператор, що реалізує таку дію: змінній А присвоїти значення True, якщо -5<X<3, і False, якщо X не належить проміжку (-5;3)?

_______________________________________________________

5. Визначити результат виконання програми:

А= –5: C=A+8

SELECT CASE C

CASE 1: A=A^3+C

CASE 2: A=A^2–C/2

CASE ELSE: A=4*A

END SELECT

PRINT A А=_______

6. Скласти блок-схему і написати програму для обчислення значення функції: .

Блок-схема алгоритму: Програмний код:

_____________________________

_____________________________

_____________________________

_____________________________

_____________________________

_____________________________

_____________________________

_____________________________

_____________________________

7. Скласти блок-схему і написати програму для обчислення значення функції: .

Блок-схема алгоритму: Програмний код:

_____________________________

_____________________________

_____________________________

_____________________________

_____________________________

_____________________________

_____________________________

_____________________________

_____________________________

Пояснення до програмного коду:

__________________________________________________________

__________________________________________________________

__________________________________________________________

__________________________________________________________

__________________________________________________________

__________________________________________________________

Тема 13. Вказівки повторення

Вказівки повторення використовуються у тому випадку, якщо необхідно деяку групу операторів повторити задану кількість разів, тобто виконати цикл.

Розрізняють два види циклів: цикли з параметром та цикли з передумовою.

Оператор циклу For...Next

Цей цикл використовують у тому випадку, коли заздалегідь відоме стартове та кінцеве значення лічильника. Синтаксис виглядає в такий спосіб:

For i = А To В Step C

Група операторів (тіло циклу)

Next i

і – параметр циклу,

А – початкове значення параметра циклу,

В – кінцеве значення параметра циклу

С – крок зміни циклічного параметра,

тіло циклу – команди, які повторюються.

Роль параметра циклу може відігравати тільки раніше оголошена змінна цілочисленного типу. Крок задає збільшення лічильника циклу при кожному проході. За замовчуванням значення кроку дорівнює 1. Після слова Next лічильник можна опустити.

Алгоритм виконання циклу:

1. циклічному параметру присвоюється початкове значення А;

2. виконується тіло циклу;

3. змінюється значення параметра циклу із заданим кроком С;

4. перевіряється умова завершення циклу, а саме, умова досягнення параметром циклу свого кінцевого значення:

якщо значення параметра циклу менше або рівне кінцевому значенню В, тоді повторно виконується тіло циклу (перехід до пункту 2 даного алгоритму), інакше відбувається вихід з циклу (виконується команда, записана після оператора Next).

Наприклад:

1. У цьому прикладі на екран виводяться значення усіх непарних чисел з проміжка [1;20].

For c = 1 To 20 Step 2

Print c

Next c

2. Чому дорівнює S після виконання циклу?

S = 0

For A=5 To 7

S = S + А

Next A

У цьому циклі обчислюється сума чисел 5+6+7, яких послідовно набуває змінна А. Отже, S=18.

3. Чому дорівнює S після виконання циклу?

S = 0

For A=10 To 5 Step –1

S = S + А

Next A

У цьому циклі обчислюється сума чисел 10+9+8+7+6+5, яких послідовно набуває змінна А, зменшуючись щоразу на Отже, S=45.

4. Які значення прийматиме параметр А при виконанні циклу:

For А = 0.1 To 1.1 Step 0.3

Відповідь: 0.1 0.4 0.7 1.0

5. Які значення прийматиме параметр А при виконанні циклу:

For А = 10 To 1 Step –2

Відповідь: 10 8 6 4 2

6. Скільки разів виконається цикл?

For A = 10 To 5 Step –1

S = S & Str(A)

Next A

Оскільки параметр А набуває у циклі значення 10, 9, 8, 7, 6 та 5 тіло циклу буде виконане для кожного з цих значень, тобто 6 разів.

Оператор циклу Do While...Loop

Цикли While призначені для ситуацій, коли кількість повторень циклу заздалегідь не відома, але зате відома умова входу до циклу. Якщо умова не виконується, керування автоматично передається до оператора, наступного після Loop і повторення тіла циклу припиняється.

Синтаксис циклу While:

Do While Умова_входу

Група операторів

Loop

Алгоритм виконання циклу:

1. циклічному параметру присвоюється початкове значення А;

2. перевіряється умова входу до циклу, а саме, якщо значення параметра циклу більше кінцевого значення В, тоді відбувається вихід з циклу (виконується команда, записана після оператора Loop), інакше повторно виконується тіло циклу (перехід до пункту 3 даного алгоритму),

3. виконується тіло циклу;

4. змінюється значення параметра циклу із заданим кроком С;

5. відбувається перехід до пункту 2 даного алгоритму (перевірка умови входу до циклу).

Якщо в циклі пропустити умову виходу або ця умова завжди виконується, то отримаємо нескінченний цикл. Наприклад такий:

Do While 2 > 1

Print "Вічний цикл"

Loop Це означає: Поки 2>1 друкуй «вічний цикл»

Якщо у Вас випадково вийшов такий цикл, то вийти з нього можна при натисканні Ctrl+Break. Але це працює тільки в середовищі розробки програми.

Наприклад:

1. Цей приклад означає наступну дію: поки оголошена ціла змінна п є невід’ємним числом, вивести її значення на екран.

Dim n As Integer

n = 100

Do While n >= 0

n = n – 1

Print n

Loop

2. Визначте значення S після виконання операторів:

X = –3: S = 0 X = 0: S = 0

Do Whіle Х<=0 Do Whіle Х<=5

X = X + 1 X = X + 1

S = S + X S = S + 1