Sum of primes in odd positions is prime: Difference between revisions
Sum of primes in odd positions is prime (view source)
Revision as of 13:30, 8 November 2021
, 2 years agoadd FreeBASIC
(add gwbasic) |
(add FreeBASIC) |
||
Line 123:
}
</pre>
=={{header|FreeBASIC}}==
<lang freebasic>#include "isprime.bas"
dim as uinteger i = 1, p, sum = 0
for p = 2 to 999
if isprime(p) then
if i mod 2 = 1 then
sum += p
if isprime(sum) then print i, p, sum
end if
i = i + 1
end if
next p</lang>
=={{header|Go}}==
| |||