A199990 Numbers with digital product = 10.
25, 52, 125, 152, 215, 251, 512, 521, 1125, 1152, 1215, 1251, 1512, 1521, 2115, 2151, 2511, 5112, 5121, 5211, 11125, 11152, 11215, 11251, 11512, 11521, 12115, 12151, 12511, 15112, 15121, 15211, 21115, 21151, 21511, 25111, 51112, 51121, 51211, 52111, 111125
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..100
Crossrefs
Cf. A107696.
Programs
-
Mathematica
Select[Range[200000], Times @@ IntegerDigits[#] == 10 &] (* T. D. Noe, Nov 16 2011 *)
Comments