(loop repeat(read)do(format t"~A "(apply'gcd(loop repeat(read)collect(read)))))