You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
#!/usr/local/bin/perl
|
|
|
|
$rad90 = °rees_to_radians(90);
|
|
$sin90 = sin($rad90);
|
|
$cos90 = cos($rad90);
|
|
print ("90 degrees:\nsine is $sin90\ncosine is $cos90\n");
|
|
|
|
sub degrees_to_radians {
|
|
local ($degrees) = @_;
|
|
local ($radians);
|
|
$radians = atan2(1,1) * $degrees / 45;
|
|
} |