Safe and Sophie Germain primes: Difference between revisions

add parigp
(add FreeBASIC)
(add parigp)
Line 102:
</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}}==
781

edits