(loop(set'a 1)(dotimes(i(read))(set'a(lcm(1+ i)a)))(format t"~D
"a))