use std::io::Read;

fn solve(n: &str) {
    let mut res = String::new();
    n.chars().rev().enumerate().for_each(|pair| {
        res.push(pair.1);
        if (pair.0 % 3 == 2) && (pair.0 + 1 < n.len()) {
            res.push(',');
        }
    });
    println!("{}", res.chars().rev().collect::<String>());
}

fn main() {
    let mut n = String::new();
    std::io::stdin().read_to_string(&mut n).ok();
    let n: &str = n.trim().split('\n').next().unwrap().trim();
    solve(n);
}