(down i(= n(read))1(prn:+""(if(>(mod i n)1)`(,(n-of(- i 1)" ")Z)(n-of n'Z))))