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