def ascan; gets.split.map(&:to_i); end

s=gets.chomp.chars
t=""
i = 0
loop do
    t+= s.pop
    i += 1
    break if s.size == 0
    if i == 3
        t+= ','
        i = 0
    end
end
puts t.reverse