local n = io.read("*n")
local a = {}
for i = 1, n + 1 do
  a[i] = 1LL
end
local b = {}
for i = 1, n * 2 + 1 do
  b[i] = 0LL
end
for i = 1, n + 1 do
  for j = 1, n + 1 do
    b[i + j - 1] = b[i + j - 1] + a[i] * a[j]
  end
end
local c = {}
for i = 1, n * 4 + 1 do
  c[i] = 0LL
end
for i = 1, 2 * n + 1 do
  for j = 1, 2 * n + 1 do
    c[i + j - 1] = c[i + j - 1] + b[i] * b[j]
  end
end
local ret = 0LL
for i = 2 * n + 1, 4 * n + 1 do
  ret = ret + c[i] * c[6 * n - i + 2]
end
local str = tostring(ret):gsub("LL", "")
print(str)