n=0
do 729
s=linein()
n=n*(n<length(s))+1
_=charout(,substr(s,n,1))
end