%I #8 May 22 2016 15:18:39
%S 1,5,25,125,46,37,185,153,186,158,18,90,64,127,56,87,49,52,67,142,131,
%T 76,187,163,43,22,110,164,48,47,42,17,85,39,2,10,50,57,92,74,177,113,
%U 179,123,36,180,128,61,112
%N 5^n mod 193.
%D I. M. Vinogradov, Elements of Number Theory, pp. 220 ff.
%p [ seq(primroot(ithprime(i))^j mod ithprime(i),j=0..100) ];
%t PowerMod[5,Range[0,50],193] (* _Harvey P. Dale_, May 22 2016 *)
%o (PARI) a(n)=lift(Mod(5,193)^n) \\ _Charles R Greathouse IV_, Mar 22 2016
%K nonn,easy
%O 0,2
%A _N. J. A. Sloane_.
|