program hanibal;
var a,x,y,b:longint;
begin
readln(a);
b:=0;

  for x:=0 to a do
  begin

       for y:=x to a do
       begin
            b:=b+y+x;
       end;
  end;
writeln(b);
readln;
end.