Disarium numbers: Difference between revisions
Add APL
(→{{header|Quackery}}: Rewrite. Better 2nd time around.) |
Not a robot (talk | contribs) (Add APL) |
||
Line 267:
0 1 2 3 4 5 6 7 8 9 89 135 175 518 598 1306 1676 2427 2646798
</pre>
=={{header|APL}}==
<syntaxhighlight lang="APL">(⊢(/⍨)(⊢=(⍎¨(+/*)⍳∘⍴)∘⍕)¨)⍳3000000</syntaxhighlight>
{{out}}
<pre>1 2 3 4 5 6 7 8 9 89 135 175 518 598 1306 1676 2427 2646798</pre>
=={{header|AppleScript}}==
| |||