program main
      implicit none
      character(3) :: n
      integer(4) ::i,j

      read *, n
      j=0
      do i = 1, 3
        if(n(i:i) == '7') then
              print *, 'Yes'
              exit
        else
               j = j + 1
        end if
      end do
      if ( j == 3 ) print *, 'No'

end program main
