   program abc166a
      implicit none
      character(3)::s

         read *, s

         if (s=='ARC') then
            print *, 'ABC'
         else
            print *, 'ARC'
         end if

   end program abc166a