OFFSET
0,3
COMMENTS
n=0 is taken as one 0 digit so that its product of digits is A007954(0) = 0.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 0..10000
EXAMPLE
n = 15: a(15) = 1*5 mod 10 = 5.
n = 26: a(26) = 2*6 mod 10 = 2.
MAPLE
a:= n-> `if`(n<10, n, irem(n, 10, 'q')*a(q) mod 10):
seq(a(n), n=0..92); # Alois P. Heinz, Mar 17 2024
MATHEMATICA
a[n_] := Mod[Times @@ IntegerDigits[n], 10]; Array[a, 100, 0] (* Amiram Eldar, Mar 17 2024 *)
PROG
(Python)
from math import prod
def a(n): return prod(map(int, str(n)))%10
print([a(n) for n in range(93)]) # Michael S. Branicky, Mar 17 2024
(PARI) a(n) = if (n==0, 0, vecprod(digits(n)) % 10); \\ Michel Marcus, Mar 17 2024
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Ctibor O. Zizka, Mar 17 2024
STATUS
approved