Еще примеры и задания
Разберите еще несколько примеров работы оператора If:
| ФРАГМЕНТ ПРОГРАММЫ | ПЕЧАТЬ | ||
| a=10
If a>2 Then Debug.WriteLine("!!!") Else Debug.WriteLine("!") | !!!
| ||
| a=4
If a>5 Then a=a+10 Else a=a-1 Debug.WriteLine(a) | 3 | ||
| s=6
If s-8<>0 Then s=2*s Debug.WriteLine(s) | 12 | ||
| s=6
If s<0 Then s=2*s s=s+1 Debug.WriteLine(s) | 7 |
Задание 5.
Определить без компьютера, какие 3 числа напечатает следующий фрагмент:
k = 20 : k = k + 10 : If k + 10 <> 30 Then k = 8 Else k = k - 1
Debug.WriteLine(k)
k = 20 : k = k + 10 : If k + 10 = 30 Then k = 8 Else k = k - 1
Debug.WriteLine(k)
p = 1 : If p > 0 Then p = p + 5
If p > 6 Then p = p + 1
Debug.WriteLine(p)
Задание 6.
В компьютер вводятся два числа. Если первое больше второго, то напечатать их сумму, иначе – произведение. После этого компьютер должен напечатать текст ЗАДАЧА РЕШЕНА.
Задание 7.
В компьютер вводятся длины трех отрезков. Компьютер должен ответить на вопрос, правда ли, что первый отрезок слишком велик, чтобы образовать с другими двумя отрезками треугольник. Указание: Для этого его длина должна быть больше или равна сумме длин двух других отрезков.
В Задание 31 вам будет предложено определить, возможен ли треугольник из этих отрезков, а затем в Задание 35 – нарисовать треугольник по трем сторонам, если он возможен.
Задание 8.
Дракон каждый год отращивает по три головы, но после того, как ему исполнится 100 лет – только по две. Сколько голов и глаз у дракона, которому N лет?
Анализируем свойства объектов. Если в выражения, входящие в условие оператора If, включить свойства объектов, то вы можете заставить компьютер с ними работать. Например, компьютеру нужно определить, видимо или невидимо в данный момент текстовое поле TextBox1. Делает это такой оператор:
If TextBox1.Visible = True Then MsgBox("Видимо") Else MsgBox("Невидимо")
Таким образом, мы расширили понятие условия в операторе If, включив в него сравнение свойства с его значениями. Вы можете писать, например, так:
If TextBox1.Width < 50 Then …
Не все свойства позволяют делать такие сравнения.
Задание 9.
Если кнопка расположена на форме с вашей точки зрения слишком высоко, пусть при нажатии на нее она опустится на 20 пикселей.
