Imports System

Module Program
    Sub Main(args As String())
        Dim sInput As String = Console.ReadLine()

        If sInput.Contains("7") Then
            Console.WriteLine("Yes")
        Else
            Console.WriteLine("No")
        End If
    End Sub
End Module