Функция Tan
Tan(Number)
Функция Tan вычисляет тангенс угла в радианах. Функция Tan является обратной к функции Atn, которая определяет величину угла в радианах по указанному отношению длин двух сторон прямоугольного треугольника. Для того,чтобы перевести градусы в радианы используйте формулу: Угол(в радианах)=угол(в градусах)*pi/180
где pi=3.14159265358979
Возвращаемое значение
Возвращает значение типа Double
Параметры
Number | Обязательный аргумент типа Double или любое допустимое числовое значение,задающее угол в радианах.Если аргумент не может быть оценен как число,генерируется ошибка времени исполнения Type mismatch
|
Пример
'Вычисляем тангенс угла 45 градусов
Dim MyAngle,retval,GradToRad
Const pi = 3.14159265358979 ' определяем константу pi
MyAngle=45 ' задаем угол в градусах
GradToRad=MyAngle*pi/180 ' переводим градусы в радианы
retval=Tan(GradToRad) ' вычисляем тангенс 45 градусов
Debug.Print retval
Категория Математические функции |