'

УСЛОВНЫЙ ОПЕРАТОР

Понравилась презентация – покажи это...





Слайд 0

УСЛОВНЫЙ ОПЕРАТОР IF . . . THEN . . . ELSE (Если … То … Иначе)


Слайд 1

УСЛОВИЕ – ЭТО ВЫСКАЗЫВАНИЕ, КОТОРОЕ МОЖЕТ БЫТЬ ЛИБО ИСТИННЫМ, ЛИБО ЛОЖНЫМ. Условие, записанное на формальном языке, называется условным или логическим выражением. Условные выражения могут быть простыми и сложными. Простое условие включает в себя два числа, две переменные или два арифметических выражения, которые сравниваются между собой с использованием операций сравнения (=, >, <, >=, <=, <>). Например, 17<2, Х>=5, X*Y=X+Y. Сложное условие – это последовательность простых условий, объединенных между собой знаками логических операций. Например, Y>-2 AND Y< 8. Оператор условного перехода может быть записан в однострочной форме или многострочной форме. В однострочной форме он записывается с помощью инструкции IF . . . THEN . . . ELSE (Если … То … Иначе)


Слайд 2

После первого ключевого слова (IF) должно быть размещено условие. После второго ключевого слова (THEN) последовательность команд (серия 1), которая должна выполняться, если условие принимает значение «истина». После третьего ключевого слова (ELSE) размещается последовательность команд (серия 2), которая должна выполняться, если условие принимает значение «ложь». Условие Серия 1 Серия 2 Многострочная форма записи оператора условного перехода IF … THEN … ELSE … END IF (ЕСЛИ … ТО … ИНАЧЕ … КОНЕЦ ЕСЛИ)


Слайд 3

Пример: Задача. Определить максимальное из двух введенных с клавиатуры чисел. 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


Слайд 4

Пример: Задача. Определить максимальное из двух введенных с клавиатуры чисел. 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: Goto 1 IF a > b Then Print a; " > "; b: Print "MAX = "; a Else Print b; " >"; a: Print "MAX = "; b End If 1 End Sub


Слайд 5

ОПЕРАТОР ВЫБОРА Select Case Выражение Case Условие 1 Серия 1 Case Условие 2 Серия 2 Case Else Серия End Select


Слайд 6

В Visual Basic инструкция выбора начинается с ключевых слов Select Case, после которых записывается выражение (переменная, арифметическое выражение). После ключевых слов Case заданное выражение сравнивается с определенными значениями – записываются условия, при истинности одного из которых начинает выполняться серия команд. Заканчивается инструкция ключевыми словами End Select. Условие 1 Серия 1 Условие 2 Серия Серия 2 Если необходимо осуществить проверку более сложных условий, чем ДА/НЕТ, целесообразно использовать SELECT … END SELECT.


Слайд 7

Пример решения задачи Задача. Если введенное с клавиатуры число меньше нуля, то вывести на экран «<0». Если число находится в пределах от 0 до 9, то вывести на экран «0-9». Если число равно 10 или 11, то вывести на экран «10,11». Во всех остальных случаях вывести на экран «>11». Private Sub Command1_Click() Dim a As Single a = Val(InputBox("Bведите число", "Bвод числа")) Select Case a Case Is < 0: Print " < 0 " Case 0 To 9: Print "0 - 9 " Case Is = 10, 11: Print "10, 11" Case Else Print " > 11 " End Select End Sub


×

HTML:





Ссылка: