Funktion sin() in Perl

In der Programmiersprache Perl gibt es die eingebaute Funktion sin(). Diese Funktion gibt den Wert der trigonometrischen Funktionen Sinus von argument.

Hier ist ein Beispiel:

▶ Run
#!/usr/bin/perl

print sin( -3.14159265358979 / 2 );

Dieses Programm zeigt die Anzahl der -1. Sinus -π/2 ist -1, und genau das zeigt das Programm.

Argumente

my $value = sin($rad);

Das argument Perl-Funktionen sin() ist eine Zahl in Bogenmaß.

Wenn Sie die Funktionen sin() ein argument übergeben, wird die Funktion mit ihm zu arbeiten.

Wenn nicht kein argument übergeben, wird die Funktion arbeitet mit einer Variablen $_. Hier ist ein Beispiel (zeigt das Programm die Anzahl der 1):

▶ Run
#!/usr/bin/perl

$_ = 3.14159265358979 / 2;

print sin;

Wenn die Funktionen sin() übergeben mehr als ein argument, dann wird der Fehler:

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

Der Rückgabewert

Funktion sin() immer eine Zahl zurück. Der Bereich möglicher Werte von -1, bis 1.

Beispiel Rückgabewert: 0.0998334166468282 (ist der Wert bei Verwendung des Arguments 0.1).

Arbeit mit Grad

Das argument sin() ist eine Zahl in Bogenmaß. Wenn Sie berechnen den Sinus-Grad, müssen Sie übersetzen in Bogenmaß. Für die Umrechnung zwischen Grad und Radiant Formel rad = degree * π/180.

Hier ist ein Beispielprogramm, das zeigt die Tabelle in Grad, Bogenmaß gebogen und den Wert des Sinus:

▶ 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);
}

In diesem Programm wird das Perl Modul Math::Trig. Wenn es angeschlossen ist, wird die Option pi(), die gibt die Anzahl der π.

Hier ist die Ausgabe dieses Programms:

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

Verwandte Themen

Die offizielle Dokumentation

Hier ist die Ausgabe des Befehls 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])) }

Andere Artikel