Module _20191029

    Sub Main()
        'https://atcoder.jp/contests/abc144/tasks/abc144_b

        Dim sRead As Integer = CInt(Console.ReadLine())

        Dim isYes As Boolean = False

        For i As Integer = 1 To 9

            If sRead Mod i = 0 AndAlso sRead \ i > 0 AndAlso sRead \ i < 10 Then

                isYes = True

            End If

        Next

        If isYes = True Then

            Console.WriteLine("Yes")

        Else

            Console.WriteLine("No")

        End If

    End Sub

End Module