Visual Basic - Арифметические выражения. Операции над целыми типами, mod.

Чтобы стать настоящим программистом, нужно иметь прочные знания в математике. При написании приложений на Visual Basic неизбежно придется применять большое количество различных математических операций.

Арифметические операции:

· + сложение

· - вычитание

· * умножение

· / деление

· ^ возведение в степень (напр. 5^2=25)

· Mod деление по модулю — процесс деления двух чисел, при котором сохраняется только остаток. Например: Mod(26,10)=6 или Mod(10,3)=1

Приоритет операций – в каком порядке они будут исполняться:

^ возведение в степень

- изменение знака

* / умножение и деление

Mod деление по модулю

+ - сложение и вычитание

 

Задания:

1. Найти длину окружности L и площадь круга S заданного радиуса R: L=2·π·R, S=π·R²

a) т.е. создать форму, поясняющий текст

b) поле ввода R

c) поля вывода L и S

d) кнопку ‘Посчитать’

2. Дано значение температуры T в градусах Фаренгейта. Определить значение этой же температуры в градусах Цельсия. Температура по Цельсию T_C и температура по Фаренгейту T_F связаны следующим соотношением: T_C=(T_F-32)·5/9.

a) …

b) … (пункты a, b, c, d аналогичны заданию №1)

c) …

d) …

3. *Даны координаты трех вершин треугольника: (x₁,y₁),(x₂,y₂),(x₃,y₃). Найти его периметр и площадь, используя формулу для расстояния между двумя точками на плоскости . Для нахождения площади треугольника со сторонами a, b, c использовать формулу Герона: S=p·(p-a)·(p-b)·(p-c), где p=(a+b+c)/2—полупериметр.

4. Дан размер файла в байтах. Используя операцию деления нацело, найти количество полных килобайтов, которые занимает данный файл (1килобайт=1024байта).

5. Дано трехзначное число. Вывести число, полученное при прочтении исходного числа с права налево.

6. …

 

Visual Basic - Логический тип данных. Логические операции not, and, or, xor.

Переменные логического типа Boolean могут хранить только значения True (правда) или False (ложь).

Допустимым является, например, выражение Var_boolean = Var_integer > 0

Над переменными логического типа возможны следующие операции:

· Not – отрицание: Not False = True

Not True = False

· And – и: True And True = True

True And False = False

False And True = False

False And False = False

· Or – или: True Or True = True

True Or False = True

False Or True = True

False Or False = False

· Xor – ‘исключающее или’: True Or True = False

True Or False = True

False Or True = True

False Or False = False

Приоритет логических операций:

Not

And

Or

 

Задания:

1. Дано целое число A. Проверить истинность высказывания:

a) «Число A является положительным»

b) «Число A является четным».

2. Даны два целых числа: A, B. Проверить истинность высказываний:

a) «Каждое из чисел A и B нечетное».

b) «Хотя бы одно из чисел A и B нечетное».

3. Даны три целых числа: A, B, C. Проверить истинность высказывания:

a) «Число B находится между числами A и C».

b) «Среди трех данных целых чисел есть хотя бы одна пара совпадающих».

c) Рассмотрев дискриминант D=B-4·A·C, проверить истинность высказывания: «Квадратное уравнение A·x²+B·x+C=0 имеет вещественные корни».

4. …

Visual Basic - Условный оператор. Оператор ветвления.

Для принятия решений в Visual Basic используется управляющая структура If…Then

If выражение Then

…'код выполняется, если выражение имеет значение True (Истина)’

End If

Если выражение принимает значение True, то выполняется программный код, расположенный между инструкцией If и инструкцией End If. Если выражение принимает значение False, то Visual Basic переходит к инструкции End If и продолжает выполнять программу, пропуская код между инструкциями If и End if.

Если необходимо выполнить некоторый программный код при значении выражения False, то между инструкциями If и End If вставляется инструкция Else:

If выражение Then

…'код выполняется, если выражение имеет значение True (Истина)

Else

…'код выполняется, если выражение имеет значение False (Ложь)

End If

Инструкция Elself позволяет программе проверить истинность еще одного выражения, если выражение в инструкции If приняло значение False:

If выражение Then

…

Elself выражение2 Then

…

Else

…

End If

Для задачи, когда сравнивает значение одного и того же выражения с различными значениями, предпочтительнее использовать конструкцию Select Case:

Select Case выражение

Case Is = значение1

…

Case Is = значение2

…

Case Else

…

End Select

 

Задания:

1. Модифицировать программу вычисления корней квадратного уравнения из 8.2 (используя условный оператор) так, чтобы текст в окнах x2 и x3 менялся:

i) Если нет корней: “-“

ii) Если один корень: в x1 – значение корня, в x2 – “-”

iii) Если два корня: как и было раньше

2. Теперь для той же задачи используйте конструкцию Select Case

3. Даны два числа. Вывести большее из них.

4. Даны три числа.

a) Найти среднее из них (то есть число, расположенное между наименьшим и наибольшим)

b) Найти сумму двух наибольших из них

5. Дано целое число в диапазоне 1–7. Вывести строку – название дня недели, соответствующее данному числу (1—«понедельник», 2—«вторник», …)

6. …