Largest number divisible by its digits: Difference between revisions

Added 11l
m (added an ;Example: section header.)
(Added 11l)
Line 33:
:*   The OEIS sequence:   [http://oeis.org/A115569 A115569: Lynch-Bell numbers].
<br><br>
 
=={{header|11l}}==
 
===Base 10===
{{trans|C++}}
<lang 11l>F check_dec(num)
Set[Int] st
L(c) String(num)
V d = Int(c)
I d == 0 | num % d != 0 | d C st
R 0B
st.add(d)
R 1B
 
L(i) (98764321 .< 0).step(-1)
I check_dec(i)
print(i)
L.break</lang>
{{out}}
<pre>
9867312
</pre>
 
=={{header|360 Assembly}}==
1,481

edits