Neighbour primes: Difference between revisions

Content added Content deleted
(Added Easylang)
 
Line 549: Line 549:
</pre>
</pre>



=={{header|EasyLang}}==
<syntaxhighlight>
fastfunc isprim num .
i = 2
while i <= sqrt num
if num mod i = 0
return 0
.
i += 1
.
return 1
.
fastfunc nextprim prim .
repeat
prim += 1
until isprim prim = 1
.
return prim
.
q = 2
repeat
p = q
until p >= 500
q = nextprim q
if isprim (2 + p * q) = 1
write p & " "
.
.
</syntaxhighlight>
{{out}}
<pre>
3 5 7 13 19 67 149 179 229 239 241 269 277 307 313 397 401 419 439 487
</pre>


=={{header|F_Sharp|F#}}==
=={{header|F_Sharp|F#}}==
Line 580: Line 614:
Real: 00:00:00.029
Real: 00:00:00.029
</pre>
</pre>

=={{header|Factor}}==
=={{header|Factor}}==
{{works with|Factor|0.99 2021-02-05}}
{{works with|Factor|0.99 2021-02-05}}