%I #8 Jul 06 2021 02:15:14
%S 1,158,399,653,802,827,1022,1985,2928,3891,4086,4111,4260,4514,4755,
%T 4912,4914,5071,5312,5566,5715,5740,5935,6898,7841,8804,8999,9024,
%U 9173,9427,9668,9825,9827,9984,10225,10479,10628,10653,10848,11811,12754,13717,13912
%N Numbers k such that k^16 == 1 (mod 17^3).
%H Amiram Eldar, <a href="/A056088/b056088.txt">Table of n, a(n) for n = 1..10000</a>
%t x=17; Select[ Range[ 20000 ], PowerMod[ #, x-1, x^3 ]==1& ]
%Y Cf. A056082, A056083, A056084, A056085, A056086, A056087, A056089.
%K nonn
%O 1,2
%A _Robert G. Wilson v_, Jun 08 2000
|