|
%I #10 Jun 30 2021 02:34:08
%S 1,38,40,65,75,110,131,134,155,158,179,214,224,249,251,288,290,327,
%T 329,354,364,399,420,423,444,447,468,503,513,538,540,577,579,616,618,
%U 643,653,688,709,712,733,736,757,792,802,827,829,866,868,905,907,932,942
%N Numbers k such that k^16 == 1 (mod 17^2).
%H Amiram Eldar, <a href="/A056027/b056027.txt">Table of n, a(n) for n = 1..10000</a>
%t x=17; Select[ Range[ 1000 ], PowerMod[ #, x-1, x^2 ]==1& ]
%Y Cf. A056021, A056022, A056024, A056025, A056026, A056028, A056031, A056034, A056035.
%K nonn
%O 1,2
%A _Robert G. Wilson v_, Jun 08 2000
|
