Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...
$power = 38;
$result = $base ** $power;
printf "%d\n", $result
  2. or download this
    program fort
      integer*8 base, power
...
      result = base ** power +1;
      print *, result
end program
  3. or download this
    C:\Users\Bill\forums\monks>perl power3.pl
5559060566555523
...
C:\Users\Bill\forums\monks>power3.exe
     5559060566555524
  1350851717672992090