OFFSET
1,3
COMMENTS
a(24) > 10^50, if it exists (cf. A284815). - Giovanni Resta, Oct 19 2025
EXAMPLE
5431101 is a term because:
5431101 mod 2 = 1, 5431101 mod 3 = 0, 5431101 mod 4 = 1,
5431101 mod 5 = 1, 5431101 mod 6 = 3, 5431101 mod 7 = 4, 5431101 mod 8 = 5.
MAPLE
P:=proc(q) local a, i, j, n, ok; print(0); print(1); for n from 1 to q do
for i from 0 to 1 do a:=10*n+i; ok:=1; for j from 1 to ilog10(a)+1 do
if (a mod 10)<>((10*n+i) mod (j+1)) then ok:=0; break; else
a:=trunc(a/10); fi; od; if ok=1 then print(10*n+i); break; fi;
od; od; end: P(10^12);
PROG
(Julia)
function ok(n::Integer) return all(n%(i+1) == d for (i, d) in enumerate(digits(n))) end
println([n for n in 0:3*10^7 if ok(n)]) # Michael S. Branicky, Oct 17 2025
(Python)
def ok(n): return all(n%i == di for i, di in enumerate(map(int, str(n)[::-1]), 2))
print([k for k in range(10**7) if ok(k)]) # Michael S. Branicky, Oct 17 2025
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Paolo P. Lava, Sep 24 2018
EXTENSIONS
Offset corrected, a(22)-a(23) added by Giovanni Resta, Oct 19 2025
STATUS
approved
