program ime;
var a,zbr,x,c: longint;
begin
readln (a);
for x:= 0 to a do
begin
for c:= x to a do
begin
zbr:=zbr+(x+c)
end;
end;
writeln(zbr);
readln;
end.