怎样仅由一个角x的sin(x)值和cos(x)值推算出这个角的arccos(x)的值呀

wyj2 2007-11-28 10:03:17
高中毕业的时间实在是太长了....
实在是想不出来啊

注意要求:
公式中除了用到sin(x)和cos(x)不能用其他的三角函数!

谢谢先
...全文
146 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
wyj2 2007-11-30
  • 打赏
  • 举报
回复
谢谢大家了

4楼用的是级数逼近法么? 怎么看不懂公式呀
能再说详细一些不?

我想用级数算法,算个近似值得了,不用sinx和cosx了

应该用哪个公式呀,再谢了
stgsd 2007-11-29
  • 打赏
  • 举报
回复
pi:=arctg(1)*4
还是要用到反正切
brightyang 2007-11-29
  • 打赏
  • 举报
回复
arccosx=pi/2-Int(dt/sqrt(1-t*t),t=0 to x)
wyj2 2007-11-29
  • 打赏
  • 举报
回复
不行.......

理论上能不能实现?
stgsd 2007-11-29
  • 打赏
  • 举报
回复

function arccos(x:double):double;
begin
for n:=0 to 15707963267949 do
begin
t:=abs(cos(n/1000000000000)-x);
if t<last then last:=t;
if t>last then
begin
result:=n/1000000000000;
exit;
end;
end;
end;
搞个蠢办法
budded 2007-11-28
  • 打赏
  • 举报
回复
cos(A)=B 则 A=arccos(B)
stgsd 2007-11-28
  • 打赏
  • 举报
回复

function ArcTan2(const Y, X: Extended): Extended;
asm
FLD Y
FLD X
FPATAN
FWAIT
end;
function ArcCos(const X: Extended): Extended;
begin
Result := ArcTan2(Sqrt(1 - X * X), X);
end;
//汇编和开方应该行吧?

5,388

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧