Презентация "Алгоритмическая структура «ветвление» на языке Visual Basic"
Подписи к слайдам:
Алгоритмическая структура «ветвление» на языке
Visual Basic
Несколько And и Or.
Решение задач
Задание 1.
- Кирсанова Инна Викторовна
- МОУ лицей «РИТМ»
- Хабаровск
- В зависимости от истинности или ложности условия выполняется одна или другая серия команд.
- Неполная форма
- Полная форма
- Условие
- нет
- да
- Операторы1
- Операторы2
- Условие
- нет
- да
- Оператор
- If условие Then
- операторы -1
- Else
- операторы-2
- End If
- Условие
- нет
- да
- Операторы1
- Операторы2
- Полная форма
- (возможно 2 варианта решения задачи)
- Компьютер должен перемножить 2 числа. Если полученное произведение превысит 1000, то он должен напечатать: ПРОИЗВЕДЕНИЕ БОЛЬШОЕ, иначе – ПРОИЗВЕДЕНИЕ МАЛЕНЬКОЕ. А после этого печатает само произведение.
- Dim a, b, p As Integer
- a = TextBox1.Text
- b = TextBox2.Text
- p = a * b
- If p > 1000 Then
- TextBox3.Text = "Произведение большое"
- Else
- TextBox3.Text = "Произведение маленькое"
- End if
- TextBox4.Text = p
- Условие
- нет
- да
- Оператор
- If условие Then операторы
- Неполная форма
- (один вариант или больше 2 вариантов)
- Прописывается столько раз, сколько
- вариантов решения задачи
- Компьютер должен перемножить 2 числа. Если полученное произведение превысит 1000, то он должен напечатать это произведение.
- a = TextBox1.Text
- b = TextBox2.Text
- p = a * b
- If p > 1000 Then TextBox4.Text = p
|
|
|
|
|
|
- Пример: If 5*a+4 <= a*b Then a=b-1 Else a=b+5
|
|
|
|
|
- Задача 3:
- Выяснить направление ветвей параболы.
- Dim a as integer
- …
- a = TextBox1.Text
- If a>0 Then
- TextBox2.Text = “ветви направлены вверх”
- Else
- TextBox2.Text = “ветви направлены вниз”
- End if
- Задача 4:
- Выяснить количество корней квадратного уравнения.
- Dim a, b, c, d as integer
- …
- a = TextBox1.Text
- b = TextBox2.Text
- c = TextBox3.Text
- d = Math.Sqr(b) – 4*a*c
- If d>0 Then TextBox4.Text = “2 корня”
- If d=0 Then TextBox4.Text = “1 корень”
- If d<0 Then TextBox4.Text = “нет действительных корней”
|
|
|
|
|
|
|
|
|
|
- Знаками And и Or можно объединять не только два, а сколько угодно условий.
- Например:
- If a>2 Or x=b Or c<>1 Then k=99 Else k=33
- If a>2 And x=b And c<>1 Then k=99 Else k=33
- Кроме логических операций And и Or применяется еще логическая операция Not (по-русски – НЕ).
- Запись If Not a>b Then...
- переводится так –
- ЕСЛИ НЕПРАВДА, ЧТО a больше b, ТО....
- Вот фрагмент:
- a=2: b=3: If Not a>b Then k=1 Else k=0
- Здесь выполнится оператор k=1, так как неправда, что 2>3.
|
|
|
|
|
|
|
|
- В компьютер вводятся два числа. Если первое больше второго, то напечатать их сумму, иначе – произведение. После этого компьютер должен напечатать текст ЗАДАЧА РЕШЕНА.
- В компьютер вводятся три числа.
- Выяснить какое из трех чисел меньше.
- Компьютер спрашивает пользователя, как его зовут, а затем приветствует его в соответствии с именем: Колю – «Привет», Васю – «Здорово», Джона – «Hi», а остальных – «Здравствуйте». Для Васи, кроме этого, он красит форму в зеленый цвет.
- В компьютер вводятся длины трех отрезков. Компьютер должен ответить на вопрос, можно или нельзя из этих отрезков образовать треугольник.
- Указание: Для этого каждый отрезок должен быть меньше суммы длин двух других отрезков.
- Напишите 3 варианта программы:
- без использования логических операций,
- с использованием логических операций Or,
- с использованием логических операций And.
- If условие Then
- операторы
- …………….
- [ ElseIf условие Then
- операторы
- ……………. ]
- ……………………….….
- [ Else
- операторы
- ……………. ]
- End If
- Ветвей ElseIf может быть сколько угодно или совсем не быть
Информатика - еще материалы к урокам:
- Презентация "Искусственные и естественные источники информации" 3 класс
- Презентация "Схема и карта" 3 класс
- Проверочная работа "Логические функции и схемы – основа элементной базы компьютера. Логические выражения и таблицы истинности" 10 класс
- Презентация "Макет верстка в настольных издательских системах" 11 класс
- Презентация "Основные типы приложений для создания документов" 11 класс
- Презентация "Классификация программного обеспечения (ПО)"