programming-examples/perl/SystemFunction/Using cos function.pl

7 lines
146 B
Perl
Raw Normal View History

2019-11-15 12:59:38 +01:00
$angle = 45;
$conversion = 3.14159265358979 / 180;
$radians = $angle * $conversion;
print "The cosine of $angle degrees = ", cos $radians