

A077312


Smallest k such that the concatenation of natural numbers from (n+1) to k is a multiple of n.


2



2, 4, 5, 6, 10, 8, 16, 12, 17, 20, 21, 20, 35, 30, 20, 20, 19, 26, 22, 40, 41, 32, 40, 36, 50, 48, 53, 44, 54, 50, 141, 52, 44, 36, 55, 44, 1035, 90, 77, 60, 101, 62, 47, 76, 80, 88, 97, 68, 145, 100, 53, 148, 146, 80, 65, 76, 60, 108, 103, 80, 107, 102, 108, 104, 115, 98
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


LINKS



MATHEMATICA

Do[k = n + 1; s = ToString[k]; While[Mod[ToExpression[s], n] > 0, k++; s = s <> ToString[k]]; Print[k], {n, 1, 100}] (* Ryan Propper, Oct 10 2005 *)


CROSSREFS



KEYWORD

base,nonn


AUTHOR



EXTENSIONS



STATUS

approved



