(loop(format t"~D
"(apply'lcm(dotimes(i(read)*)(push(1+ i)*)))))