Слайд 2
![УСЛОВИЕ – ЭТО ВЫСКАЗЫВАНИЕ, КОТОРОЕ МОЖЕТ БЫТЬ ЛИБО ИСТИННЫМ, ЛИБО ЛОЖНЫМ.](/_ipx/f_webp&q_80&fit_contain&s_1440x1080/imagesDir/jpg/242466/slide-1.jpg)
УСЛОВИЕ – ЭТО ВЫСКАЗЫВАНИЕ, КОТОРОЕ МОЖЕТ БЫТЬ ЛИБО ИСТИННЫМ, ЛИБО ЛОЖНЫМ.
Слайд 3
![Условные выражения могут быть простыми и сложными. Простое условие включает](/_ipx/f_webp&q_80&fit_contain&s_1440x1080/imagesDir/jpg/242466/slide-2.jpg)
Условные выражения могут быть простыми и сложными.
Простое условие включает в себя
два числа, две переменные или два арифметических выражения, которые сравниваются между собой с использованием операций сравнения (=, >, <, >=, <=, <>).
Например, 17<2, Х>=5, X*Y=X+Y.
Сложное условие – это последовательность простых условий, объединенных между собой знаками логических операций.
Например, Y>-2 AND Y< 8.
Слайд 4
![Операторы условного перехода имеют следующую блок-схему:](/_ipx/f_webp&q_80&fit_contain&s_1440x1080/imagesDir/jpg/242466/slide-3.jpg)
Операторы условного перехода имеют следующую блок-схему:
Слайд 5
![Конструкция оператора условного перехода может иметь линейную или вертикальную формы.](/_ipx/f_webp&q_80&fit_contain&s_1440x1080/imagesDir/jpg/242466/slide-4.jpg)
Конструкция оператора условного перехода может иметь линейную или вертикальную формы.
Линейная форма (используется при коротких
сериях):
If условие Then Cерия 1 [Else Cерия 2]
Вертикальная форма (используется при длинных сериях):
If условие Then
Cерия 1
Else
Cерия 2
End If
Слайд 6
![Примеры задач: 1) INPUT “введите 2 числа, А и В”](/_ipx/f_webp&q_80&fit_contain&s_1440x1080/imagesDir/jpg/242466/slide-5.jpg)
Примеры задач:
1) INPUT “введите 2 числа, А и В”
IF A>B THEN S=A
PRINT S END
2) INPUT “ВВЕДИТЕ 2 ЧИСЛА, А И В”
IF X>0 THEN
PRINT "ЧИСЛО ПОЛОЖИТЕЛЬНОЕ"
ELSE
PRINT "ЧИСЛО ОТРИЦАТЕЛЬНОЕ"
END IF
Слайд 7
![Задача. Определить максимальное из двух введенных с клавиатуры чисел. Private](/_ipx/f_webp&q_80&fit_contain&s_1440x1080/imagesDir/jpg/242466/slide-6.jpg)
Задача. Определить максимальное из двух введенных с клавиатуры чисел.
Private Sub Command1_Click()
Dim
a As Single
Dim b As Single
a = Val(InputBox("Bведите 1 число", "Bвод числа"))
b = Val(InputBox("Bведите 2 число", "Bвод числа"))
IF a = b Then Print a; "="; b
IF a > b Then
Print a; " > "; b: Print "MAX = "; a
Else
Print b; " >"; a: Print "MAX = "; b
End If
End Sub
Слайд 8
![ОПЕРАТОР ВЫБОРА Select Case Выражение Case Условие 1 Серия 1](/_ipx/f_webp&q_80&fit_contain&s_1440x1080/imagesDir/jpg/242466/slide-7.jpg)
ОПЕРАТОР ВЫБОРА
Select Case Выражение
Case Условие 1
Серия 1
Case Условие 2
Серия 2
Case Else
Серия
End
Select
Слайд 9
![Например: Select Case sDayOfWeek Case "Понедельник" MsgBox “Кружок рисования" Case](/_ipx/f_webp&q_80&fit_contain&s_1440x1080/imagesDir/jpg/242466/slide-8.jpg)
Например:
Select Case sDayOfWeek
Case "Понедельник"
MsgBox “Кружок рисования"
Case "Вторник"
MsgBox «Танцевальный кружок"
…
Case Else
MsgBox "На
этот день у нас ничего не предусмотрено"
End Select
Слайд 10
![Оператор безусловного перехода GOTO Метка – число обозначающее номер строки,](/_ipx/f_webp&q_80&fit_contain&s_1440x1080/imagesDir/jpg/242466/slide-9.jpg)
Оператор безусловного перехода GOTO
Метка – число обозначающее номер строки, натуральное число
с двоеточием после него. Указывается только в начале строки.
GOTO <метка>
Пример: GOTO 17
Слайд 11
![Задание №1 для проверки полученных знаний:](/_ipx/f_webp&q_80&fit_contain&s_1440x1080/imagesDir/jpg/242466/slide-10.jpg)
Задание №1 для проверки полученных знаний: