9 lines
194 B
Perl
9 lines
194 B
Perl
print "Welcome to the Exponentiator!\n";
|
|
print "Enter a number: ";
|
|
|
|
while ($s = <>) {
|
|
print "\n";
|
|
print " $s";
|
|
print "e = " . exp($s) . "\n";
|
|
print "Enter a number: ";
|
|
} |