do 2e4
x=charin()
do' '>>x|x>>y
y=x charout(,x)
end
end