main@m=do n<-readLn;print$foldl1 lcm[1..n];m