program example
	implicit none

	character(3) :: a
    integer :: i,wa=0
    
    read(*,*) a
    
    do i=1,3
    	if(a(i:i)=="7") then
        	wa=wa+1
        end if
    end do
    
    if(wa/=0) then
    
    	write(*,*) "Yes"
    else
    	write(*,*) "No"
        
    end if

end program
