Module Module1

    Sub Main()

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

        ans = "No"
        For i = 2 To 9
            If N / i <= 9 Then
                If Int(N / i) * i = N Then
                    ans = "Yes"
                    Exit For
                End If
            End If
        Next

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

    End Sub

End Module
