기능 sin() 에서는 Perl

에서는 Perl 프로그래밍 언어가 내장된 기능 sin(). 이 함수의 값을 반환합니다 삼각함수의 사인의 인수입니다.

예를 들어 다음과 같습니다.

▶ Run
#!/usr/bin/perl

print sin( -3.14159265358979 / 2 );

이 프로그램이 표시됩니다 수 -1. 동 -π/2-1이 무엇인가에 의해 표시되는 프로그램입니다.

인수

my $value = sin($rad);

수 Perl 기능 sin() 번호 라디안입니다.

는 경우 기능 sin() 을 통과하는 하나의 인수 기능을 작동할 것입니다.

전달하지 않는 경우는 모든 인수,함수와 함께 작동하 는 기본 변수 $_. 여기에 예를 들어(프로그램 번호가 표시됩 1):

▶ Run
#!/usr/bin/perl

$_ = 3.14159265358979 / 2;

print sin;

는 경우 기능 sin() 전달 하나 이상의 인수,그것은 오류가:

Too many arguments for sin at script.pl line 3, near "0)"
Execution of script.pl aborted due to compilation errors.

반환 값

기능 sin() 항상 수를 반환합니다. 의 범위는 가능한 값은 -1,을 1.

예를 반환 값: 0.0998334166468282 (이 값을 사용할 때 인수 0.1).

작업도

인수 sin() 번호 라디안입니다. 해야 하는 경우의 사인을 계산하기 위해 도로,그들은 해야 라디안으로 변환됩니다. 변환하 도하 라디안 사용할 수식 rad = degree * π/180.

여기에 샘플 프로그램을 인쇄하는 테이블과 도,라디안,사인 비율:

▶ Run
#!/usr/bin/perl

use utf8;
use strict;
use warnings;
use feature qw(say);

use Math::Trig;

say 'deg      rad  sin(rad)';

for (my $degree = 0; $degree<=360; $degree += 15) {
    my $rad = $degree * pi() / 180;
    say sprintf '%3d  %0.5f  % 0.5f', $degree, $rad, sin($rad);
}

프로그램을 사용하여 Perl 모듈 Math::Trig. 할 때 연결이 사용할 수 있는 기능 pi(), 는 수를 반환합니다 π.

여기에는 이 프로그램의 출력:

deg      rad  sin(rad)
  0  0.00000   0.00000
 15  0.26180   0.25882
 30  0.52360   0.50000
 45  0.78540   0.70711
 60  1.04720   0.86603
 75  1.30900   0.96593
 90  1.57080   1.00000
105  1.83260   0.96593
120  2.09440   0.86603
135  2.35619   0.70711
150  2.61799   0.50000
165  2.87979   0.25882
180  3.14159   0.00000
195  3.40339  -0.25882
210  3.66519  -0.50000
225  3.92699  -0.70711
240  4.18879  -0.86603
255  4.45059  -0.96593
270  4.71239  -1.00000
285  4.97419  -0.96593
300  5.23599  -0.86603
315  5.49779  -0.70711
330  5.75959  -0.50000
345  6.02139  -0.25882
360  6.28319  -0.00000

관련 주제

공식적인 문서

여기에 출력하는 명령의 perldoc -f sin:

       sin EXPR
       sin     Returns the sine of EXPR (expressed in radians).  If EXPR is
               omitted, returns sine of $_.

               For the inverse sine operation, you may use the
               "Math::Trig::asin" function, or use this relation:

                   sub asin { atan2($_[0], sqrt(1 - $_[0] * $_[0])) }

다른 기사