паскаль сойдет? я не знаю что такое КуМир
var a,b,i:longint;
sum:int64;
begin
read(a,b);
for i:=a to b do
sum:=sum+(i*i);
writeln(sum);
end.
