Munchausen numbers: Difference between revisions
Content added Content deleted
Langurmonkey (talk | contribs) (added langur language example) |
|||
| Line 1,112: | Line 1,112: | ||
0 1 3435 438579088 |
0 1 3435 438579088 |
||
</pre> |
</pre> |
||
=={{header|Langur}}== |
|||
sort of copying from the C# example... |
|||
<lang Langur># sum power of digits |
|||
val .spod = f(.n) fold f .x + .y, map(f (.x-'0') ^ (.x-'0'), stringToCp toString .n) |
|||
# Munchausen |
|||
writeln "Answers: ", where f(.n) .n == .spod(.n), series 1..5000</lang> |
|||
{{out}} |
|||
<pre>Answers: [1, 3435]</pre> |
|||
=={{header|Lua}}== |
=={{header|Lua}}== |
||