Option Strict On

Module Module1
    Const n As Long = 8

    Sub Main()
        'let'
        Dim tmp() As Long =
            Array.ConvertAll(Of String, Long) _
            (Split(Console.ReadLine()), AddressOf Long.Parse)

        Dim A As Long = tmp(0)
        Dim B As Long = tmp(1)

        'var'
        Dim ans As String

        If Math.Max(A, B) <= n Then
            ans = "Yay!"
        Else
            ans = ":("
        End If

        Console.WriteLine(ans)

    End Sub
End Module