Задача, Написать программу, которая определяет, попадает ли точка с заданными Опции

[Kun]

В общем, задачу я почти решил, но осталось описать правую сторону треугольника.
Вот блин не догоняю как ето сделать. Помогите !!!!!

Константа r=4, высота и основание треугольника равны r.
X и Y вводятся с клавиатуры.

if (x<=0) and (x>=r) and (y<=0) and (y<=r) and ((sqr(x)+sqr(y)<=sqr®)  {описание окружности, 2-я четверть, её нет на рисунке}
then writeln('точка попадает в закрашенную область')
else
if (x>=0) and (x<=r) and (y>=0) and (y<=r) and (y<=-2x) {вот тут должо быть описание правой стороны}
then writeln('точка попадает в закрашенную область')
else 
writeln('очка не попадает в закрашенную область');

Белые х ничего не значать(просто я рисунок не смог выложить) .
xxxxxxxxxxy
xxxxxxxxxx|
xxxxxxxxxx|
xxxxxxxxxx|
xxxxxxxxxx|
_________|___________x
xxxxxxxxxx|\xxxxxx/
xxxxxxxxxx|x\xxxx/
xxxxxxxxxx|xx\xx/
xxxxxxxxxx|xxx\/
xxxxxxxxxx|
xxxxxxxxxx|