Munchausen numbers: Difference between revisions

Content added Content deleted
(→‎{{header|Dc}}: \\o o// \o/)
Line 580: Line 580:
<lang dc>[ O ~ S! d 0!=M L! d ^ + ] sM
<lang dc>[ O ~ S! d 0!=M L! d ^ + ] sM
[p] sp
[p] sp
[z d d lM x =p z 5000>L ] sL
[z d d lM x =p z 5001>L ] sL
lL x</lang>
lL x</lang>