Module Module1

    Sub Main()

        Dim N As Integer = Console.ReadLine()
        Dim i As Integer
        Dim ans As String

        ans = "No"
        If N <= 81 Then
            For i = 9 To 2 Step -1
                If N \ i <= 9 AndAlso N Mod i = 0 Then
                    ans = "Yes"
                    Exit For
                End If
            Next
        End If

        Console.WriteLine(ans)
        'Console.Read()

    End Sub

End Module
