%I#20 2018年9月19日02:58:23
%S 0,0,0,1,0,0,0,0'0,00,0',0,1,2,3,4,5,6,7,8,9,9,21,0,2,3,5,6,7,8,1,9,32,
%温度0,1,2,3,4,5,6,7,8,9,43,0,1,2,3,45,6,1,7,8,9,54,0,12,3,4],5,6,7,8,1,9,65,
%U 0,1,2,3,4,5,6,7,8,9,76,0,1,2,3,4,1,5,6,7,8,1,9,87,0,12,3,4,5,6,1,8,9,98,0
%N最小回文p,使N-p再次成为回文,如果不存在,则为N。
%当且仅当A262087(n)=0时,C a(n)=n。
%H Robert Israel,n的表,a(n)表示n=0..10000</a>
%e a(11)=0,因为11=11+0,所以0是11作为两个回文之和的任何分区中最小的回文。
%e a(21)=21,因为21不能写成两个回文的和。
%p isP:=k->StringTools[IsPalindrome](转换(k,字符串)):
%p a:=空:
%p代表从0到99 do的n
%p an:=n:
%p代表k从0到n/2 do
%p如果isP(k)和isP(n-k),则an:=min(an,k)结束,如果
%p端do:
%p a:=a,一个
%p端do:
%p a;
%Y参考A002113、A035137、A260254、A262087。
%K nonn,基础,看
%O 0,14
%2018年9月18日,A_Markus Sigg
|