main = do
       e<-getLine
       e2<-getLine
       let x=read e::Integer
           y=read e2::Integer
           ds=[[0,0,0,0,0,0,0],[1,3,1,3,1,3,1],[2,2,2,2,2,2],[3,3,3,3,3,3],[4,0,4,0,4,0],[5,5,5,5,5,5]]
           ts=ds!!(fromIntegral((x-1) `mod` 6)::Int)
           ts2=ts!!(fromIntegral((y-1) `mod` 6)::Int)
           ans=[2,8,5,7,1,4]!!ts2
       print $ ans