- •Приклади написання деяких математичних функцій у vb.
- •Пріоритети виконання операцій
- •Лабораторна робота №3
- •Завдання до лабораторної роботи
- •Загальні теоретичні відомості
- •Однорядковий оператор умовного переходу перевіряє задану умову, якщо вона дійсна, то виконує одну послідовність дій, якщо хибна – іншу послідовність дій.
- •Формат блочного оператора умовного переходу має вигляд:
- •Контрольні питання
- •Додаток Задачі лінійної структури
- •Задачі розгалуженої структури
- •Література
- •Інформатика Методичні вказівки
Формат блочного оператора умовного переходу має вигляд:
IF <умова1> Then
< блок операторів 1>
[ ELSEIF <умова2> Then
< блок операторів 2>
.
..
ELSEIF <умова (n-1)> Then
< блок операторів (n-1)>
ELSE
< блок операторів n> ]
END IF
Якщо дійсною є перша умова, то виконується блок операторів 1 і управління передається наступному за END IF оператору. Якщо перша умова хибна, то перевіряються інші умови поки не буде знайдена дійсна і виконається відповідний блок операторів. В тому випадку, коли всі умови є хибні, а оператор ELSE відсутній, то виконується наступний за END IF оператор.
В середині блочного IF можуть знаходитися ще кілька операторів IF блочних або однорядкових.
Приклад 4: Обчислити
Схема алгоритму наведена на рис. 9.
Рис. 9
Розроблений інтерфейс та результат виконання програми:
Програмний код:
Private Sub Command1_Click()
Dim x, y As Single
x = Val(Text1)
If x < -1 Then
y = 1 / x
ElseIf x >= -1 And x < 2 Then
y = 1 / x ^ 2
Else
y = 4
End If
Text2 = y
End Sub
Private Sub Command2_Click()
End
End Sub
Приклад 9: Обчислити
Схема алгоритму наведена на рис. 10.
Програмний код:
Private Sub Command1_Click()
Dim x, y, c, d As Single
x = Val(Text1)
c = Val(Text2)
d = Val(Text3)
If x <= 1.5 And x > 2.5 Then
y = c * x + d
Text4 = Format(y, "0.00")
Label5 = "1,5<=x<2,5"
ElseIf x >= 2.5 And x < 3.5 Then
y = c ^ 2 + d ^ 2
Text4 = Format(y, "0.00")
Label5 = "2,5<=x<3,5"
ElseIf x >= 3.5 And x < 4.5 Then
y = c - d * x
Text4 = Format(y, "0.00")
Label5 = "3,5<=x<4,5"
Else
Label5 = "немає рішень"
End If
End Sub
Private Sub Command2_Click()
End
End Sub
Розроблений інтерфейс та результат виконання програми:
Рис. 10
Контрольні питання
Типи алгоритмічних процесів?
Який алгоритмічний процес називається лінійним?
Які графічні блоки використовують при зображенні лінійного алгоритму?
Який алгоритмічний процес називається розгалуженим?
Які бувають розгалуження?
Що таке складне розгалуження?
Які графічні блоки використовують при зображенні розгалуженого алгоритму?
З чого може починатися коментар?
Що таке константи і як вони оголошуються?
Що таке змінні і як вони оголошуються?
Що таке вираз?
Який пріоритет виконання операцій у виразі?
Які стандартні функції можна використовувати в програмах?
Які типи даних Ви знаєте?
Способи оголошення змінних.
Як виконується оператор присвоєння?
Як ввести числову інформацію з текстового вікна (TextBox)?
Який оператор виведення використовується для виведення інформації на форму (Form)?
Як вивести інформацію у вікно графічного об’єкта (PictureBox)&
Як вивести інформацію в текстове вікно (TextBox)?
Які оператори можуть бути використані при реалізації розгалуженого алгоритму при програмуванні?
Оператор безумовного переходу GOTO.
Які дії виконується, якщо в операторі умовного переходу IF умова хибна, а ключове слово ELSE відсутнє? .
Як працює блочний оператор умовного переходу?
Яким ключовим словом закінчується блочний оператор умовного переходу?