C1

пройдемся от 1 до N И ПРОСТО БУДЕМ возводить переменную цикла в квадрат и добавлять ее к ответу.
ОБЫЧНО i,j,k-переменные цикла(если есть возможность то I, потом j, потом k).
------------------------------------------
var
s,i,n:longint;
begin
readln(n);
 for i:= 1 to n do
  s:= s+(i*i);
 writeln(s);
end.