Munchausen numbers: Difference between revisions
Add BQN
Not a robot (talk | contribs) (Add COBOL) |
Not a robot (talk | contribs) (Add BQN) |
||
Line 594:
<pre> 1
3435</pre>
=={{header|BQN}}==
<lang bqn>Dgts ← (↕10˙)⊐•Fmt-'0'˙
IsMnch ← ⊢=+´∘(⋆˜ Dgts)
IsMnch¨⊸/ 1+↕5000</lang>
{{out}}
<pre>⟨ 1 3435 ⟩</pre>
=={{header|C}}==
| |||