Triplet of three numbers: Difference between revisions

Content added Content deleted
(Added Easylang)
 
Line 1,079: Line 1,079:
<syntaxhighlight>
<syntaxhighlight>
n = 6000
n = 6000
len p[] n + 5
len p[] n + 4
for i = 2 to sqrt n
for i = 2 to sqrt len p[]
if p[i] = 0
if p[i] = 0
for j = i * 2 step i to n
for j = i * 2 step i to len p[]
p[j] = 1
p[j] = 1
.
.
.
.
.
.
for i = 3 to n
for i = 3 to n - 1
if p[i - 1] = 0 and p[i + 3] = 0 and p[i + 5] = 0
if p[i - 1] = 0 and p[i + 3] = 0 and p[i + 5] = 0
print i & ": " & i - 1 & " " & i + 3 & " " & i + 5
print i & ": " & i - 1 & " " & i + 3 & " " & i + 5