Домашняя страница Undo Do Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Справочники

МЕНЮ САЙТА
  • 1
  • 2
  • 3

КАТЕГОРИИ РАЗДЕЛА

ОПРОСЫ
Какой версией Excel Вы пользуетесь?
Всего ответов: 35740
Главная » Справочники » Функции VBA » Математические функции

Cos

Функция Cos


Cos(Number)

Функция Cos вычисляет косинус угла. Аргумент задается в радианах Для того, чтобы перевести градусы в радианы используйте формулу:

Угол(в радианах) = угол(в градусах) * 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=Cos(GradToRad) ' вычисляем косинус прямого угла
Debug.Print retval

Категория
Математические функции

Счетчики: 3230 | Добавил: Serge_007
Всего комментариев: 0
Добавлять комментарии могут только зарегистрированные пользователи.
[ Регистрация | Вход ]
Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!