Find squares n where n+1 is prime: Difference between revisions
added Arturo
(→OCaml: add) |
Drkameleon (talk | contribs) (added Arturo) |
||
Line 24:
1 4 16 36 100 196 256 400 576 676
</pre>
=={{header|Arturo}}==
<syntaxhighlight lang="arturo">1..31 | select 'x -> prime? 1 + x^2
| map 'x -> x^2
| print</syntaxhighlight>
{{out}}
<pre>1 4 16 36 100 196 256 400 576 676</pre>
=={{header|AutoHotkey}}==
| |||