局部xyzmax,ins,x,x8,y,y8,z,z8;
xyzmax:=细胞(根[8](nmax/3));
a:={};
对于x从1到xyzmax do
x8:=x^8;
如果3*x8>nmax,则
断裂;
结束条件:;
对于x do中的y
y8:=y^8;
如果x8+2*y8>nmax,则
断裂;
结束条件:;
从y do到z
z8:=z^8;
如果x8+y8+z8>nmax,则
断裂;
结束条件:;
如果x8+y8+z8<=nmax,则
a:=并集{x8+y8+z8};
结束条件:;
结束do:
结束do:
结束do:
排序(convert(a,list));
结束进程:
n最大值:=6755626171875;
列表文件(L,“b003381.txt”,1)#R.J.马塔尔2020年8月1日
|