#![allow(non_snake_case, unused_imports)]

use proconio::{input, marker::Usize1, marker::Chars};
use itertools::Itertools;

#[allow(unused_macros)]
macro_rules! d {
    ( $( $x:expr ),* $(,)? ) => {
        eprintln!(
            concat!( $( stringify!($x), "={:?} " ),* ),
            $( $x ),*
        );
    };
}

#[allow(dead_code)]
fn yn(b: bool) -> &'static str {
    if b { "Yes" } else { "No" }
}

fn main() {
    input! {
        N: usize,
        S: [String; N],
    }

    let k = N / 11;
    let t = "#####".repeat(k);
    let ans = if S[0].contains(&t) {
        "KCPC"
    } else {
        "KUPC"
    };

    println!("{}", ans);
}