var
x: longint;
i: longint;
s: longint;
begin
read(x);
x := x * 2;
s := 0;
for i := 1 to x do
s := s + i * i;
write(s);
read
end.
var
x: longint;
i: longint;
s: longint;
begin
read(x);
x := x * 2;
s := 0;
for i := 1 to x do
s := s + i * i;
write(s);
read
end.