Математические Функции языка Visual Basic

Занятие 4. Вычисления на VB

End Sub

Private Sub Command1_Click()

End Sub

Next I

PRINT I;

Private Sub Command1_Click()

Next I

PRINT I,

Private Sub Command1_Click()

End Sub

Next I

PRINT I

Private Sub Command1_Click()

End Sub

Private Sub Command1_Click()

End Sub

Private Sub Command1_Click()

R$ = “Вася”

? R$

На экране появляется слово: Вася

4. Оператор PRINT выводит на экран числа, слова, результаты математических действий. (Не выводит знак “). Если в операторе PRINT есть математическое выражение, то компьютер вычисляет его и результат печатает на экране.

PRINT 10 – 3 + 4

Ответ: 11

5. Выясним, как ведет себя оператор без знаков препинания, и с ними. Знаками препинания в операторе считаются только два - запятая и точка с запятой.

Чтобы выяснить действие знаков препинания в операторе PRINT рассмотрим работу программы:

а) Никаких знаков препинания нет

For I = 1 to 50

На экране мы видим столбик чисел:

…

Если в операторе PRINT нет знаков препинания, то информация выводится каждый раз с новой строки, в столбик.

б) Поставим после переменной I запятую, и вновь выполним программу.

For I = 1 to 50

End Sub

На экране: 1 2 3 4 5 ….

Информация выводится в строке через 10 пробелов.

в) Поставим после переменной I точку с запятой, и вновь выполним программу.

For I = 1 to 50

На экране: 1 2 3 4 5 ….

Информация выводится через 1 пробел.

Ø Теперь мы можем прибавить два к двум и получить ответ:

? “2 + 2 = ”; 2 + 2

На экране: 2 + 2 = 4

6. PRINT ставится в том месте программы, где требуется что-нибудь вывести на экран.

7. Вместо оператора PRINT можно печатать ? (знак вопроса).

Для вычисления математических функций используются стандартные функции:

Функция	Математика	Visual Basic
Абсолютная величина числа x	| x |	abs(x)
Квадратный корень из числа x		sqr(x)
Возведение в степень		4^3
Корень третьей степени из числа x		x^(1/3)
Корень нечетной степени из отрицательного числа		-x^(1/5)
Экспонента числа x		exp(x)
Натуральный логарифм числа x	ln x	log(x)
Десятичный логарифм числа x	lg x	log(x) / log(10)
Остаток от деления х на у		x mod y
Округление числа x с точностью а		round (x, a)
Целая часть числа x		int(x)
Команда, включающая генератор случайного числа		Randomize
Функция вырабатывающая случайное число в диапазоне от 0 до 1		rnd
Функция, переводящая текст, состоящий из цифр в число		val()
Функция преобразующая число в текст		str$()
Синус числа x (в радианах)	sin x	sin (x)
Косинус числа x (в радианах)	cos x	cos (x)
Тангенс числа x (в радианах)	tg x	tan (x)
Котангенс числа x (в радианах)	ctg x	1/tan(x)
Арктангенс числа x (в радианах)	arctg x	atn (x)
Арксинус числа x (в радианах)	arcsin x	atn(x/sqr (-x*x+1))
Арккосинус числа x (в радианах)	arccos x	-atn(x/sqr(-x*x+1))+1.5708
Арккотангенс числа x (в радианах)	arcctg x	-atn(x)+1.5708

Перевод из градусов в радианы

Как вычислить sin 41°?

41° Мы должны перевести в радианы.

Составим пропорцию:

180° - p рад

41° - x рад

рад = град × 3.141592 / 180

Поэтому выражение sin 41° на языке Бейсик записывается: sin (41 * 3.141592 / 180)