f=foldl(\a b->2*a+read[b])0
g s=scanr(\_->(`div`2))(f(take 8 s)*f(drop 9 s))[1..7]>>=show.(`mod`2)
main=interact$g