Jump to content

Prime numbers p for which the sum of primes less than or equal to p is prime: Difference between revisions

→‎{{header|XPL0}}: Made it less stupid.
(Realize in F#)
(→‎{{header|XPL0}}: Made it less stupid.)
Line 409:
];
 
int Count, N, M, Sum;
[Count:= 0;
Sum:= 0;
for N:= 2 to 1000-1 do
if IsPrime(N) then
[Sum:= 0Sum + N;
for M:= 2 to N do
if IsPrime(M) then
Sum:= Sum + M;
if IsPrime(Sum) then
[IntOut(0, N);
772

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.