$tran = 
[
	[' '],
	%w(' , . ! ?),
	%w(a b c A B C),
	%w(d e f D E F),
	%w(g h i G H I),
	%w(j k l J K L),
	%w(m n o M N O),
	%w(p q r s P Q R S),
	%w(t u v T U V),
	%w(w x y z W X Y Z)
]

def translate(s)
	# p s
	n = s.length
	return "" if n == 0
	c = s[0]
	k = 0
	k += 1 while k < n && s[k] == c
	c = c.to_i
	t = k
	k = k - 1
	t += 1 if s[t] == '0'
	$tran[c][(k) % $tran[c].size] + translate(s[t...n])
end

while line = gets
	puts translate(line)
end