set s ""
while {[set c [read stdin 1]]>""} {set s $c$s}
puts $s