Page 162 - 4671
P. 162
LOG10(число) Функція для обчислення десяткового логарифму з основою 10
LОG(число,основа) Функція обчислення логарифма з довільною основою
Якщо кут задано в градусах, мінутах, секундах, то для знаходження
тригонометричних функцій кута можна скористатись спеціальною програмою, написаною
мовою Visual Basic
Програма користувача для переводу градусів, мінут, секунд в десяткові градуси.
Function Convert_Decimal(Degree_Deg As String) As Double
' Объявление переменных в формате числа с плавающей запятой двойной точности.
Dim degrees As Double
Dim minutes As Double
Dim seconds As Double
' Установить число градусов равным части аргумента функции до символа «°»
degrees = Val(Left(Degree_Deg, InStr(1, Degree_Deg, "°") - 1))
' Установить число минут равным части аргумента функции между символами «°» и «'»
' текстовой строки Degree_Deg, переведенной в числовой формат
' 60. с помощью функции Val и поделенной на 60.
minutes = Val(Mid(Degree_Deg, InStr(1, Degree_Deg, "°") + 2, _
InStr(1, Degree_Deg, "'") - InStr(1, Degree_Deg, _
"°") - 2)) / 60
' Установить число минут равным части аргумента функции справа от символа «'»,
' переведенной в числовой формат и поделенной на 3600.
seconds = Val(Mid(Degree_Deg, InStr(1, Degree_Deg, "'") + _
2, Len(Degree_Deg) - InStr(1, Degree_Deg, "'") - 2)) _
/ 3600
Convert_Decimal = degrees + minutes + seconds
End Function
Для використання отриманої функції Convert_Decimal треба створити формулу переводу,
наприклад таку:
1. Натиснути клавіші ALT+F11, щоб запустити редактор Visual Basic.
2. В меню Insert вибрати команду Module.
3. Введіть в модулі наведений выще код функции Convert_Decimal.
4. Натисніть ALT+F11 для повернення в Excel.
5. В клітинці A1 введите таку формулу:
=Convert_Decimal("10° 27' 36""")
Примітка. В кінці аргумента цієї формули необхідно ввести три подвійних лапки ("""),
таким чином беручи в лапки позначення секунд. Посилання на клітинку не вимагає лапок.
6. В цьому прикладі формула повертає значення 10.46.
Логічні функції
Логічні вирази використовуються для запису умови, де порівнюються числа,
функції, формули, текстові або логічні значення. Будь-який логічний вираз повинен
містити принаймні один оператор порівняння, який визначає співвідношення між
елементами логічного виразу.
Результатом логічного виразу є або логічне значення ИСТИНА (1), або логічне
значення ЛОЖЬ (0).
160