%I#27 2015年1月16日19:23:34

%S 0、19、29、39、49、59、59、69、79、89、99

%N数N，使N=（N位数的乘积）+（N位数之和）。

%C如果K1*K2*K3**Km-9_（m-1）*K1-9_（m-2）*K2….=0，其中Ki是n的数字，9_。因此m=2，所以序列是完整的。

%p选择（proc（t）local d；d： =换算（t，基数，10）；convert（d，`+`）+convert[d，`*`）=t结束进程，[$0..100]）；#_罗伯特·伊斯雷尔，2014年12月16日

%t选择[Range[100]，#==Times@@IntegerDigits[#]+Plus@@IntigerDigits[#]&]（*_Michael De Vlieger_，2014年12月26日*）

%o（PARI）isok（n）=我的（d=数字（n））；n==（总和（i=1，#d，d[i]）+乘积（i=1,#d，d\i]））；\\_Michel Marcus，2014年4月6日

%K fini、nonn、base、full

%O 1,2号机组

%费利斯·拉索（_F）_