Sum[k*[(Ceiling[(k)/(6)]-Floor[(k)/(6)])],k=100,999]