let n = read_int ()
let a = Array.init n (fun _ -> Scanf.scanf " %d" (fun i -> i))
let m = Array.fold_left (fun i j -> max i j) 0 a
let check = Array.make (m + 1) false

let d = Array.make (m + 1) 0

let rec pre i =
  if i <= m then (
    if d.(i) = 0 then (
      let rec sieve j =
        let k =  i * j in
        if k <= m then (
          d.(k) <- i;
          sieve (j + 1)
        ) in
      sieve 1;
    );
    pre (i + 1)
  )


let rec solve i =
  if i = n then "pairwise coprime"
  else (
    let rec f a =
      if a > 1 then (
        let p = d.(a) in
        if check.(p) then true
        else (
          check.(p) <- true;
          let rec g a p =
            let r = a mod p in
            if r = 0 then g (a / p) p
            else a in
          f (g a p)
        )
      ) else false in
    if f a.(i) then "setwise coprime"
    else solve (i + 1)
  )

let rec gcd a b =
  let r = a mod b in
  if r = 0 then b
  else gcd b r

let gcd a = Array.fold_left (fun i j -> gcd i j) a.(0) a

let () =
  let g = gcd a in
  let ans =
    if g > 1 then "not coprime"
    else (
      pre 2;
      solve 0
    ) in
  Printf.printf "%s\n" ans
