Smallest square that begins with n: Difference between revisions
Content added Content deleted
(Added Easylang) |
Not a robot (talk | contribs) (Add APL) |
||
Line 198: | Line 198: | ||
41209 4225 4356 441 45369 4624 4761 484 49 |
41209 4225 4356 441 45369 4624 4761 484 49 |
||
</pre> |
</pre> |
||
=={{header|APL}}== |
|||
<syntaxhighlight lang="apl">5 10⍴'∘',0 {1=⊃(⍕⍵)⍷⍕⍺×⍺:⍺×⍺ ⋄ (⍺+1)∇⍵}¨ ⍳49</syntaxhighlight> |
|||
{{out}} |
|||
<pre> ∘ 1 25 36 4 529 64 729 81 9 |
|||
100 1156 121 1369 144 1521 16 1764 1849 196 |
|||
2025 2116 225 2304 2401 25 2601 2704 289 2916 |
|||
3025 3136 324 3364 3481 35344 36 3721 3844 3969 |
|||
400 41209 4225 4356 441 45369 4624 4761 484 49</pre> |
|||
=={{header|Arturo}}== |
=={{header|Arturo}}== |