sum(dispterms(sum((n:fix(n/a),10^a*mod(n,a+1)),a,1,7)),n,0,1000);