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

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

Offset

1,1

Links

Table of n, a(n) for n=1..66.

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

Cf. A077310, A077311.

Sequence in context: A122721 A014224 A175342 * A325558 A140779 A348937

Adjacent sequences: A077309 A077310 A077311 * A077313 A077314 A077315

Keyword

base,nonn

Author

Amarnath Murthy, Nov 03 2002

Extensions

More terms from Ryan Propper, Oct 10 2005

Status

approved