даны два целых числа а и в а в найти сумму квадратов всех чисел от A до B включительно в кумире

Ответ:

Var

a,b,c,i:integer;

Begin

Readln(a);

readln(b);

c:=0;

For i:=a to b do

c:=c+i*i;

writeln(c);

end.

Объяснение:

Это на первую задачу, там если надо текст подставишь