Safe and Sophie Germain primes: Difference between revisions
Content added Content deleted
(add FreeBASIC) |
(add parigp) |
||
Line 102: | Line 102: | ||
</pre> |
</pre> |
||
=={{header|PARI/GP}}== |
|||
<lang parigp>issg(n)=if(isprime(n)&&isprime(1+2*n),1,0) |
|||
c = 0 |
|||
n = 2 |
|||
while(c<50,if(issg(n),print(n);c=c+1);n=n+1)</lang> |
|||
=={{header|Perl}}== |
=={{header|Perl}}== |