|
%I #7 Dec 16 2023 18:42:13
%S 1,1,2,3,8,5,8,5,4,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,
%T 0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,
%U 0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0,5,0
%N Final digit of n!! (A006882).
%C For n>8: a(n)=0 if n is even, a(n)=5 if n is odd. - _Dmitry Kamenetsky_, Jan 17 2009
%e The final digit of n! is 1,2,6,4,0,0,0,0,0,0,0,0,0,...
%t Join[Mod[Range[0,8]!!,10],PadRight[{},120,{5,0}]] (* _Harvey P. Dale_, Dec 16 2023 *)
%K nonn,base
%O 0,3
%A Kousaka Hideaki (kousaka(AT)d6.dion.ne.jp), Jan 15 2009
%E Offset corrected, more terms added by _R. J. Mathar_, Jan 18 2009
|
