Привести примеры Х, У, при которых программа неверно решает поставленную задачу - VB

Формулировка задачи:

На экзамене требовалось написать программу, которая вводит с клавиатуры координаты точки на плоскости (х,у - действительные числа) и определяет принадлежность точки неограниченной заштрихованной области, включая ее границы.

Input x,y
If y>=0 Then
If x<=abs(y-2) Then
Print "Принадлежит"
Else
Print "Не принадлежит"
End If
End If
End Sub

Надо сделать следующие : 1) Привести примеры Х, У, при которых программа неверно решает поставленную задачу 2) Привести верный исправленный код программы Очень прошу помогите, я условие понимаю, а чет не работает(

Решение задачи: «Привести примеры Х, У, при которых программа неверно решает поставленную задачу»

textual
                            Листинг программы 
                        

                            Private Sub Command1_Click()
Dim x As Integer, y As Integer
x = InputBox("  ", , 1)
y = InputBox("  ", , 1)
If y >= 0 Then
     If x <= Abs(y - 2) Then
         Print "Принадлежит"
     Else
         Print "Не принадлежит"
     End If
End If
End Sub
                        