VB 版 (精华区)

发信人: zxfsnow (最近睡眠太少), 信区: VB
标  题: VB中三角函数的实现 (转) 
发信站: 哈工大紫丁香 (2000年06月06日09:17:58 星期二), 转信

发信人: gnim (阿笨-2代), 信区: VB
标  题: VB中三角函数的实现 (转)
发信站: 虎踞龙蟠 (Sun Apr 23 10:25:28 2000), 转信

发信人: xzw (杀死台独), 信区: VisualBasic
标  题: Re: 请问?#32;vb的反三角函数arccos怎么实现？ Thanks .?
发信站: BBS 水木清华站 (Fri Apr 21 17:49:10 2000) WWW-POST

这是从office2000中找到的帮助信息，对vb也应该是一样的！

导出的数学函数


以下为非基本数学函数的列表，皆可由基本数学函数导出：

函数 由基本函数导出之公式
Secant（正割） Sec(X) = 1 / Cos(X)
Cosecant（余割） Cosec(X) = 1 / Sin(X)
Cotangent（余切） Cotan(X) = 1 / Tan(X)
Inverse Sine
（反正弦）
 Arcsin(X) = Atn(X / Sqr(-X * X + 1))
Inverse Cosine
（反余弦）
 Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
Inverse Secant
（反正割）
 Arcsec(X) = Atn(X / Sqr(X * X - 1)) + Sgn((X) - 1) * (2 * Atn(1))
Inverse Cosecant
（反余割）
 Arccosec(X) = Atn(X / Sqr(X * X - 1)) + (Sgn(X) - 1) * (2 * Atn(1))
Inverse Cotangent
（反余切）
 Arccotan(X) = Atn(X) + 2 * Atn(1)
Hyperbolic Sine
（双曲正弦）
 HSin(X) = (Exp(X) - Exp(-X)) / 2
Hyperbolic Cosine
（双曲余弦）
 HCos(X) = (Exp(X) + Exp(-X)) / 2
Hyperbolic Tangent
（双曲正切）
 HTan(X) = (Exp(X) - Exp(-X)) / (Exp(X) + Exp(-X))
Hyperbolic Secant
（双曲正割）
 HSec(X) = 2 / (Exp(X) + Exp(-X))
Hyperbolic Cosecant（双曲余割） HCosec(X) = 2 / (Exp(X) - Exp(-X))
Hyperbolic Cotangent（双曲余切） HCotan(X) = (Exp(X) + Exp(-X)) / (Exp(X) -
Exp(-X))
Inverse Hyperbolic Sine（反双曲正弦） HArcsin(X) = Log(X + Sqr(X * X + 1))
Inverse Hyperbolic Cosine（反双曲余弦） HArccos(X) = Log(X + Sqr(X * X - 1))

Inverse Hyperbolic Tangent（反双曲正切） HArctan(X) = Log((1 + X) / (1 - X))
/ 2
Inverse Hyperbolic Secant（反双曲正割） HArcsec(X) = Log((Sqr(-X * X + 1) +
1) / X)
Inverse Hyperbolic Cosecant HArccosec(X) = Log((Sgn(X) * Sqr(X * X + 1) + 1)
/ X)
Inverse Hyperbolic Cotangent
（反双曲余切）
 HArccotan(X) = Log((X + 1) / (X - 1)) / 2
以 N 为底的对数 LogN(X) = Log(X) / Log(N)



【 在 Love1976 (狄飞惊) 的大作中提到: 】
: 用不着这么麻烦，VB中直接就有。
: Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)?
  
--

 以科计为本,以产业报国!
  超越自我,飞跃无限!
  

※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: 202.118.235.249]