Largest number divisible by its digits: Difference between revisions
Largest number divisible by its digits (view source)
Revision as of 09:56, 15 December 2023
, 5 months ago→{{header|Wren}}: Changed to Wren S/H
m (→{{header|Wren}}: Changed to Wren S/H) |
|||
| (One intermediate revision by one other user not shown) | |||
Line 950:
for i to len dig[]
if n mod dig[i] <> 0
.
.
Line 959:
proc perm pos . .
if found = 1
.
for i = 9 downto 1
Line 2,542:
===base 10===
{{trans|Kotlin}}
<syntaxhighlight lang="
var magic = 9 * 8 * 7
Line 2,578:
{{trans|AWK}}
The integers here are too large (>= 2^53) to be accurately represented by Wren and so we follow the AWK approach of using an array of digits to represent them.
<syntaxhighlight lang="
var base = 16
var size = 15
| |||