Munchausen numbers: Difference between revisions
Content added Content deleted
Langurmonkey (talk | contribs) |
Langurmonkey (talk | contribs) |
||
| Line 1,763: | Line 1,763: | ||
{{trans|C#}} |
{{trans|C#}} |
||
<syntaxhighlight lang="langur"># sum power of digits |
<syntaxhighlight lang="langur"># sum power of digits |
||
val .spod = fn |
val .spod = fn .n: fold fn{+}, map(fn .x: .x^.x, s2n string .n) |
||
# Munchausen |
# Munchausen |
||
writeln "Answers: ", filter fn |
writeln "Answers: ", filter fn .n: .n == .spod(.n), series 0..5000 |
||
</syntaxhighlight> |
</syntaxhighlight> |
||