%I #10 Jun 30 2021 02:32:52

%S 1,115,117,145,229,235,333,338,374,388,414,430,439,440,448,513,521,

%T 522,531,547,573,587,623,628,726,732,816,844,846,960,962,1076,1078,

%U 1106,1190,1196,1294,1299,1335,1349,1375,1391,1400,1401,1409,1474,1482,1483

%N Numbers k such that k^30 == 1 (mod 31^2).

%H Amiram Eldar, <a href="/A056035/b056035.txt">Table of n, a(n) for n = 1..10000</a>

%t x=31; Select[ Range[ 2000 ], PowerMod[ #, x-1, x^2 ]==1& ]

%Y Cf. A056021, A056022, A056024, A056025, A056026, A056027, A056028, A056031, A056034.

%K nonn

%O 1,2

%A _Robert G. Wilson v_, Jun 08 2000