Summarize primes: Difference between revisions

m
(add Fermat)
Line 42:
s:=0
for i=1, 162 do s:=s+Prime(i);if Isprime(s)=1 then n:=n+1;!!(n,Prime(i),s) fi od
</lang>
{{out}}<pre>
1 2 2
781

edits