Smallest numbers: Difference between revisions
Content added Content deleted
(Added Wren) |
|||
Line 274: | Line 274: | ||
done... |
done... |
||
</pre> |
|||
=={{header|Wren}}== |
|||
{{libheader|Wren-big}} |
|||
{{libheader|Wren-seq}} |
|||
{{libheader|Wren-fmt}} |
|||
<lang ecmascript>import "/big" for BigInt |
|||
import "/seq" for Lst |
|||
import "/fmt" for Fmt |
|||
var res = [] |
|||
for (n in 0..50) { |
|||
var k = 1 |
|||
while (true) { |
|||
var s = BigInt.new(k).pow(k).toString |
|||
if (s.contains(n.toString)) { |
|||
res.add(k) |
|||
break |
|||
} |
|||
k = k + 1 |
|||
} |
|||
} |
|||
System.print("The smallest positive integers K where K ^ K contains N (0..50) are:") |
|||
for (chunk in Lst.chunks(res, 17)) Fmt.print("$2d", chunk)</lang> |
|||
{{out}} |
|||
<pre> |
|||
The smallest positive integers K where K ^ K contains N (0..50) are: |
|||
9 1 3 5 2 4 4 3 7 9 10 11 5 19 22 26 8 |
|||
17 16 19 9 8 13 7 17 4 17 3 11 18 13 5 23 17 |
|||
18 7 17 15 9 18 16 17 9 7 12 28 6 23 9 24 23 |
|||
</pre> |
</pre> |