Помогите, пожалуйста с задачей Паскаль.Даны два целых числа A и B (A<B). Найти сумму квадратов всех целых чисел от A до B включительно.

Цикл открывается по переменной В и верхний параметр В ? Почему S - real , когда параметры цикла целые?

var s,a,b,i:integer;beginread(a,b);s:=0;for i:=a to b dos:=s+sqr(i);writeln(s);end.

VarA,B:integer;S:real;BeginWrite('A = ');ReadLn(A);Write('B = ');ReadLn(B);S:=0;For B:= A to B do    S:=S+B*B;WriteLn('S = ',S);End.