Smallest square that begins with n: Difference between revisions

Content added Content deleted
(Added Easylang)
(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}}==