M={0=>0_i64}
P=(gets||"").split[0].to_i64
def c(n);M[n]||=c(0+(m=P/-~(P/n)))+(P%n+P%-~m)*(n-m)/2 end
ARGF.each_line{|e|l,r=e.split.map &.to_i;puts c(r)-c(l-1)}