请教已知余弦的值，如何求对应的角度。

faintlife

请教已知余弦的值，如何求对应的角度。
程序能求得cos（c） = 0.711，现在想利用求出的值算出角度，求指点。
想知道在perl中是如何计算利用反余弦计算的？
arccos、arcsin 在perl中如何使用？
小弟perl新手，求大哥大姐赐教。
不胜感激。

zhlong8

数学类的模块往往都以 Math:: 开头可以上 CPAN 上直接搜。你需要的模块名子叫 Math::Trig 是 Perl 自带的

jason680

回复 1# faintlife

How about this
http://search.cpan.org/~jhi/perl-5.8.1/lib/Math/Trig.pm

$ perl -e 'use Math::Trig;
  $value=cos(pi*44.66/180);
  $angle=acos($value);
  print "cos value=$value\n";
  print "arc cos=$angle (0~", pi,")\n";
  print "degree=",$angle*180/pi," (0~180)\n"'
cos value=0.711290362755794
arc cos=0.779464043940667 (0~3.14159265358979)
degree=44.66 (0~180)

   

faintlife

谢谢各位，我的perl版本比较低，没有这个模块。
但是今天也解决了问题，
用的atan 转换的。 acos $value = atan2 ( sqrt ( 1 - cos（$value ) ** 2 ) , cos ($value) );
得出了结果。