%I#7 2014年3月23日03:19:06
%S 1,2,3,4,5,6,7,8,9,16,24,32,40,48,56,64,72,80,88,96108216324432,
%电话:54064875686497212162432364848648009216100001800020000,
%U 280003000038000400004800048000580005800068000680007800088000900098000108000
%N个数,其中N的最后K个数字构成一个整数,可被K^3整除,对于K=1,2。。。,M、 其中M是n中的位数。
%e a(33)=4864,因为4可以被1^3整除,64可以被2^3整除了,864可以被3^3整掉,4864可以被4^3整去。
%tokQ[n_]:=模[{idn=IntegerDigits[n]},和@@(可除[#[2]],#[[1]]^3]&/@表[{i,起始数字[Take[idn,-i]]}、{i,长度[idn]}])]
%t选择[Range[200000],okQ](*哈维·P·戴尔,2010年12月10日*)
%K基,nonn
%O 1,2号机组
%A Sudipta Das(juitech(AT)vs.nl.net),2003年2月3日
%E来自Harvey P.Dale_的附加条款,2010年12月10日
|