use proconio::input;

fn dfs (n: u128, ans: &mut Vec<char>) -> Result<(), ()> {
    //println!("now: {}, {:?}", n, ans);
    if n == 1 { return Ok(()); }
    if n == 0 { return Err(()); }
    if (n-1) % 2 != 0 && (n-1) % 3 != 0 { return Err(()); }
    if n % 2 == 0 {
        ans.push('B');
        dfs((n-1)/3, ans)?;
    }
    else {
        ans.push('A');
        match dfs((n-1)/2, ans) {
            Ok(()) => return Ok(()),
            Err(()) => {
                ans.pop();
                ans.push('B');
                dfs((n-1)/3, ans)?;
            }
        }
    }
    Err(())
}

fn main () {
    input! {
        mut n: u128,
    }
    let mut ans: Vec<char> = Vec::new();
    Some(dfs(n, &mut ans));
    let s = ans.iter()
        .rev()
        .map(|&c| c.to_string())
        .collect::<String>();
    println!("{}", s);
}