ll@X,L=301,M=L**3*3,A=0,Y;char t[M]{};rep(d,L){rep(a,d+1)rep(b,a,d+1)t[a**3+b**3+d**3]++;rep(e,d,L)rep(f,e,L)0<=(Y=X-d**3-e**3-f**3)<M?A+=t[Y]:A;}wt(A);