%I#14 2022年12月18日09:00:51

%编号：1、2、7、21159898160321123061275596740315410036，

%电话13004569625652464178339578891891031772826978077279147051102，

%电话：1858346830379397970956553965382671314361950831274120380144023032486931

%N无意义序列。

%t（*求解[x^3-x-1==0，x]*）

%电话：1.3247179572447460259609088544780973407；

%t位数=18；

%t a=表[如果[m==0，Phi，Phi*积[素数[n]，{n，1，m}]]，{m，0，数字}]；

%t b=表[Exp[Sum[n，{n，0，m}]]，{m，0，Digits}]；

%t c=表格[楼层[a[[楼层[（n+1）/2]]*b[[楼层[n/2]]]，{n，2，数字+1}]

%K nonn，未经编辑，较少

%O 0,2

%A _Roger L.Bagula，2003年11月20日