A057250 Numbers n such that n | 12^n + 11^n + 10^n + 9^n + 8^n.

1, 2, 5, 6, 10, 25, 30, 34, 50, 55, 125, 150, 250, 275, 605, 625, 750, 850, 950, 1250, 1325, 1375, 2290, 2735, 2915, 3025, 3125, 3750, 5214, 5375, 6250, 6655, 6875, 8070, 8490, 10763, 12925, 15125, 15625, 17725, 17750, 18750, 21250, 22825, 31250

Offset

1,2

Links

Harvey P. Dale, Table of n, a(n) for n = 1..100

Mathematica

Select[ Range[ 10^6 ], Mod[ PowerMod[ 12, #, # ] + PowerMod[ 11, #, # ] + PowerMod[ 10, #, # ] + PowerMod[ 9, #, # ] + PowerMod[ 8, #, # ], # ] == 0 & ]
Select[Range[32000], Mod[Total[PowerMod[Range[8, 12], #, #]], #]==0&] (* Harvey P. Dale, Aug 05 2021 *)

Crossrefs

Sequence in context: A227975 A123645 A057252 * A248051 A056643 A057256

Adjacent sequences: A057247 A057248 A057249 * A057251 A057252 A057253

Keyword

nonn

Author

Robert G. Wilson v, Sep 21 2000

Status

approved