r=平方[2];z=13;
p[x_]:=分数部分[x];f[x_]:=楼层[x];
w[n,k_]:=p[r^n]+p[r*k]-p[r*n+r*k]
扁平[表[w[n,k],{n,1,z},{k,1,n}]]
表格形式[表格[w[n,k],{n,1,z},{k,1,n}]]
表[s[n],{n,1,100}]
h[n,k_]:=f[p[n*r]+p[k*r]]
扁平[表[h[n,k],{n,1,z},{k,1,n}]]
表格形式[表格[h[n,k],{n,1,z},{k,1,n}]]
t[n]:=总和[h[n,k],{k,1,n}]
|