%I #5 Jul 17 2021 16:08:19
%S 0,0,1,0,0,4,1,0,1,0,1,4,1,10,10,0,1,10,1,0,16,10,1,16,0,10,19,20,1,
%T 10,1,0,1,10,25,28,1,10,22,0,1,40,1,32,10,10,1,16,8,0,49,12,1,46,45,
%U 24,43,10,1,40,1,10,37,0,55,10,1,48,31,20,1,64,1,10,25,12,67,4,1,0,73,10,1
%N 10^(n-1) modulo n.
%F If n is of form 2^i*5^j then a(n)=0, otherwise a(n)=10^(n-1)+n-A053041(n)
%e a(6)=4 since 100000=6*16666+4
%t Table[PowerMod[10,n-1,n],{n,100}] (* _Harvey P. Dale_, Jul 17 2021 *)
%Y Cf. A003592, A053041, A056969.
%K nonn
%O 1,6
%A _Henry Bottomley_, Jul 20 2000
|