lexa23072003

var n,s,i:integer;

begin

read(n);

s:=1;

for i:=2 to n do  

s:=s+i*i;

write(s);

end.