login
A057251
Numbers n such that n | 11^n + 10^n + 9^n + 8^n + 7^n.
0
1, 3, 5, 9, 15, 25, 27, 45, 75, 81, 87, 125, 135, 155, 225, 243, 265, 297, 375, 405, 625, 675, 729, 775, 1107, 1125, 1215, 1875, 2025, 2187, 3125, 3375, 3645, 3875, 4779, 4805, 5625, 6075, 6561, 9369, 9375, 10125, 10935, 12175, 12879, 15625, 16875
OFFSET
1,2
MATHEMATICA
Select[ Range[ 10^5 ], Mod[ PowerMod[ 11, #, # ] + PowerMod[ 10, #, # ] + PowerMod[ 9, #, # ] + PowerMod[ 8, #, # ] + PowerMod[ 7, #, # ], # ] == 0 & ]
Select[Range[17000], Mod[Total[PowerMod[Range[7, 11], #, #]], #]==0&] (* Harvey P. Dale, Jul 20 2021 *)
CROSSREFS
Sequence in context: A057259 A045599 A045604 * A015965 A231114 A056741
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Sep 21 2000
STATUS
approved