login
A352464
Numbers k whose decimal expansion ends in the product of digits of k.
1
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 30, 40, 50, 60, 70, 80, 90, 100, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 130, 140, 150, 160, 170, 180, 190, 200, 210, 220, 230, 236, 240, 250, 260, 270, 280, 290, 300, 310, 315, 320, 324, 330, 340, 350, 360, 370, 380, 390, 400
OFFSET
1,2
EXAMPLE
10 is a term because "10" ends in "0" = 1*0;
118 is a term because "118" ends in "8" = 1*1*8;
236 is a term because "236" ends in "36" = 2*3*6; etc.
MATHEMATICA
q[n_] := Module[{d = IntegerDigits[n], p, dp, ndp}, p = Times @@ d; dp = IntegerDigits[p]; ndp = Length[dp]; dp == d[[-ndp ;; -1]]]; Select[Range[400], q] (* Amiram Eldar, Mar 17 2022 *)
PROG
(Python)
from math import prod
def ok(n): s = str(n); return s.endswith(str(prod(map(int, s))))
print([k for k in range(1, 401) if ok(k)]) # Michael S. Branicky, Mar 17 2022
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Eric Angelini and Carole Dubois, Mar 17 2022
STATUS
approved