Help for this page
use Math::Pari qw/ PARI Mod /;
my($n, $p) = map PARI($_), (3, 17);
my $recip = PARI(1) / Mod($n, $p);
print "1 / $n == $recip\n";
$int = int($recip);
PARI: *** incorrect type in comparison. at -e line 1.
$int = pari2iv($recip);
PARI: *** incorrect type in gtolong. at -e line 1.
1. Keep it simple
2. Just remember to pull out 3 in the morning
3. A good puzzle will wake me up
Many. I like to torture myself
0. Socks just get in the way
Results (386 votes). Check out past polls.