int@X,L=301,M=L+1,A=0;ll s;unordered_map<int,ll>t;rep(a,L)rep(b,a,L)rep(c,b,L)(t[a**3+b**3+c**3]*=M)+=c+1;rep(d,L)rep(e,d,L)rep(f,e,L){if(t.count(s=X-d**3-e**3-f**3)){s=t[s];while(s)d>=s%M-1?++A:A,s/=M;}}wt(A);