Module Module1

    Sub Main()
        Dim sheep As Integer
        Dim Wolves As Integer

        Console.Write("sheepを入力してください")
        sheep = Integer.Parse(Console.ReadLine())
        Console.Write("Wolvesを入力してください")
        Wolves = Integer.Parse(Console.ReadLine())

        If sheep > Wolves Then
            Console.WriteLine("safe")
        ElseIf sheep < Wolves Then
            Console.WriteLine("unsafe")
        Else
            Console.WriteLine("unsafe")
        End If


    End Sub

End Module
