Дано натуральное число n. Найти сумму n^2+(n+1)^2+….+(2n)^2 — Pascal(Паскаль)

var n,s,i:integer;
begin
writeln('введите натуральное число');
readln(n);
for i:=0 to n do
  s:=s+(n+i)*(n+i);
writeln(s);
readln;
end.