7 lines
167 B
Perl
7 lines
167 B
Perl
$asine = POSIX::asin $sine;
|
|
|
|
$reconversion = 180 / 3.14159265358979;
|
|
|
|
$degrees = $asine * $reconversion;
|
|
|
|
print "The arcsine of $sine = ", $degrees, " degrees."; |