OFFSET
1,2
COMMENTS
Are there only finitely many such numbers?
Primes in the sequence are A130076.
Next term, if it exists, exceeds 5*10^8. - Jon E. Schoenfield, May 07 2021
MAPLE
q:= k-> is(0=5&^k-3&^k-2&^k mod k^2):
select(q, [$1..1000])[]; # Alois P. Heinz, May 07 2021
MATHEMATICA
Select[Range[1000], Mod[PowerMod[2, #, #^2] + PowerMod[3, #, #^2], #^2] == PowerMod[5, #, #^2] &] (* Amiram Eldar, Apr 05 2021 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Thomas Ordowski, Apr 05 2021
STATUS
approved