var
 m, n, i:integer;
 sum:longint;
begin
sum:=0;
for i:=m to n do begin
sum:=sum+sqr(i);
end; 
writeln(sum);
end.