(use srfi-1)(map(rec'x(apply print x":1"(map(rec'i(if(=(fmod x i)0)#`" ,i"""))(iota x 2))))(iota(read)1))