Anonymous user
Mersenne primes: Difference between revisions
GP
(Added Julia language) |
(GP) |
||
Line 198:
2 ^ 4423 - 1
</pre>
=={{header|PARI/GP}}==
<lang parigp>LL(p)={
my(m=Mod(4,1<<p-1));
for(i=3,p,m=m^2-2);
m==0
};
forprime(p=2,, if(LL(p), print("2^"p"-1")))</lang>
=={{header|Perl}}==
| |||