Delphi-6 - среда разработки программного обеспечения для систем промышленной автоматизации. Букреев В.Г - 96 стр.

UptoLike

Составители: 

ПРИЛОЖЕНИЕ 1
Таблица П1
Тригонометрические подпрограммы
function ArcCos(X: Extended): Extended; Арккосинус
function ArcSin(X: Extended): Extended; Арксинус
function ArcTan2(Y, X: Extended): Ex
tended;
Вычисляет арктангенс Y/X и возвраща-
ет угол в правильном квадранте (функ-
ция АгсТап модуля System не учитыва-
ет квадрант)
function Cotan(X: Extended): Extended; Котангенс
function Hypot (X, Y: Extended): Ex-
tended;
Корень квадратный из (X** 2 + Y** 2)
гипотенуза прямоугольного треуголь-
ника по двум катетам
procedure SinCos (Theta: Extended; va:
'"Sin, Cos: Extended);
Возвращает одновременно синус и ко-
синус угла Theta (почти в 2 раза быст-
рее, чем раздельное получение синуса и
косинуса)
function Tan(X: Extended): Extended; Тангенс
Функции преобразования углов
function CycleToRad(Cycles: Extended) :
Extended;
Radians := Cycles * 2PI
function DegToRad(Degrees: Extended)
Extended;
Radians := Degrees * PI / 18
function GradToRad(Grads: Extended):
Extended;
Radians := Grads * PI / 200
function RadToDeg(Radians: Extended)
Extended;
Degrees := Radians * 180 / PI
function RadToGrad(Radians: Extended) :
Extended
Grads := Radians * 200 / PI
function RadToCycle(Radians: Ex-
tended) : Extended;
Cycles := Radians / 2PI
Гиперболические функции
function ArcCosh(X: Extended): Ex-
tended;
Гиперболический арккосинус
function ArcSinh(X: Extended): Extended; Гиперболический арксинус
function ArcTanh(X: Extended): Ex-
tended;
Гиперболический арктангенс
function Cosh(X: Extended): Extended; Гиперболический косинус
function Sinh(X: Extended): Extended; Гиперболический синус
function Tanh(X: Extended): Extended; Гиперболический тангенс
Логарифмические функции
Function LnXP1 (X: Extended) : Ex-
teaded;
Логарифм натуральный от (Х+1). Ис-
пользуется, когда Х близок к нулю
functios Extended): Extended; Десятичный логарифм
functior extended): Extended; Двоичный логарифм
96