m@main=do n<-readLn;print$p[n+1..2*n]`div`p[1..n];m
p=product