%I #12 Jul 06 2021 02:15:09
%S 1,333,623,956,1145,1689,2819,2820,2834,4025,4039,4040,5170,5714,5903,
%T 6236,6526,6858,6860,7192,7482,7815,8004,8548,9678,9679,9693,10884,
%U 10898,10899,12029,12573,12762,13095,13385,13717,13719,14051,14341,14674,14863,15407
%N Numbers k such that k^18 == 1 (mod 19^3).
%H Amiram Eldar, <a href="/A056089/b056089.txt">Table of n, a(n) for n = 1..10000</a>
%t x=19; Select[ Range[ 20000 ], PowerMod[ #, x-1, x^3 ]==1& ]
%Y Cf. A056082, A056083, A056084, A056085, A056086, A056087, A056088.
%K nonn
%O 1,2
%A _Robert G. Wilson v_, Jun 08 2000
|