program test
implicit none
integer(8) :: n,l1,l2,l3

read(*,*) n

l1 = int(n/100)
l2 = (n-l1)/10
l3 = mod(n,10)

if(l1==7 .or. l2==7 .or. l3==7) then
  write(*,*) 'Yes'
else
  write(*,*) 'No'
endif

end