|
|
|
|
22, 777, 4444, 68868, 200000, 303030, 333000, 333333, 555555, 660000, 660660, 666666, 700000, 2332200, 3131313, 4444400, 6060600, 7007000, 7700000, 9009790, 9656955, 9885585, 11517771, 14233221, 14331231, 14333110, 14411040, 15143331, 15233221, 15331231, 15333110
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
链接
|
|
|
MAPLE公司
|
使用(数字理论):P:=proc(q)局部a,b,c,d,j,k,n;对于从1到q的n,执行a:=排序(转换(n,基数,10));
对于k从1到trunc(nops(a)/2),执行c:=a[k];a[k]:=a[nops(a)-k+1];a[nops(a)-k+1]:=c;od;k: =1;b: =a[1];c: =0;
对于从2到nops(a)的j,如果a[j]=b,那么k:=k+1;否则d:=10*k+b;c: =c*10^(ilog10(d)+1)+d;k: =1;b: =a[j];fi;od;
d: =10*k+b;c: =c*10^(ilog10(d)+1)+d;如果类型为(n/c,integer),则打印(n);fi;od;结束:P(10^99);
|
|
数学
|
选择[Range[10^6],Divisible[#,FromDigits@Flatten@Map[IntegerDigits,DeleteCases[#,k_/;First@k==0]&@Reverse@MapIndexed[{#1,(First@@2-1)}&,RotateRight@DigitCount@#]&](*迈克尔·德弗利格2016年12月12日*)
|
|
交叉参考
|
|
|
关键词
|
非n,容易的,基础
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|