print((function (f, g, n)
	if n>=50 then return "000000000000" end
	if n<15 then return g(n) end
	return f(math.floor, g, n)
end)(function (f, g, n)
	local a,b,c,l,r,s={},{},{},1,5,tostring(g(15))
	for i=1,12 do a[i]=tonumber(s:sub(-13+i,-13+i)) end
	for _=1,n-15 do
		r=r+1 if r==10 then l,r=l+1,0 end
		for i=1,12 do b[i],c[i]=0,0 end
		for i=12,2,-1 do
			local t,u=a[i]*r+b[i],a[i]*l+c[i]
			b[i-1],b[i],c[i-1],c[i]=f(t/10),t%10,f(u/10),u%10
		end
		b[1],c[1]=(a[1]*r+b[1])%10,(a[1]*l+c[1])%10
		a[11],a[12]=0,b[12]
		for i=11,2,-1 do
			local t=a[i]+b[i]+c[i+1]
			a[i-1],a[i]=t>9 and 1 or 0,t%10
		end
		a[1]=(a[1]+b[1]+c[2])%10
	end
	return table.concat(a)
end, function (n)
	local r=1 for i=1,n do r=r*i end return r
end, io.stdin:read("*n")))