12 lines
185 B
Perl
12 lines
185 B
Perl
|
use POSIX;
|
||
|
|
|
||
|
|
$angle = 45;
|
||
|
|
|
||
|
|
$conversion = 3.14159265358979 / 180;
|
||
|
|
|
||
|
|
$radians = $angle * $conversion;
|
||
|
|
|
||
|
|
$sine = sin $radians;
|
||
|
|
|
||
|
|
print "The sine of $angle degrees = ", $sine, "\n";
|