use proconio::{fastout, input, marker::Bytes};

#[fastout]
fn main() {
    input! {
        n: Bytes,
    }

    println!("{}", output(solve(n)));
}

fn solve(n: Vec<u8>) -> bool {
    n.iter().any(|&n| n == b'4') && n.into_iter().any(|n| n == b'6')
}

fn output(ans: bool) -> &'static str {
    match ans {
        true => "Beautiful",
        false => "...",
    }
}