Sequence of primorial primes: Difference between revisions

Content added Content deleted
No edit summary
Line 2,532: Line 2,532:
str = ""
str = ""
for n = 1 to max
for n = 1 to max
if isprime(n) = 1
if isprime(n) = 1
add(primes, n)
add(primes, n)
ok
ok
next
next
for n = 1 to len(primes)
for n = 1 to len(primes)
sum = 1
sum = 1
for m = 1 to n
for m = 1 to n
sum = sum * primes[m]
sum = sum * primes[m]
next
next
if (isprime(sum+1) or isprime(sum-1)) = 1
if (isprime(sum+1) or isprime(sum-1)) = 1
see "" + n + " "
see "" + n + " "
ok
ok
next
next