Помогите решить 3-ью задачку. По программке pascal

Ответ:

На фото малюсенько что видно, но я попробую помочь.

Как математически это представить?

1)

Точка обязана быть ниже линии у=(непонятка1) горизонтальная линия

2)

Точка обязана быть левее полосы х=(непонятка2) вертикальная линия

3)

Точка обязана быть выше полосы у=(непонятка3 зависящая от х) затратная линия

По программистски условие смотрится так:

If уlt;(непонятка1) and xlt;(непонятка2) and ygt;(непонятка3 зависящая от х) then write('принадлежит');

Else write(' не принадлежит');

Итоговая прога смотрится приблизительно так:

Var x,y: real;

Begin

Read(x,y);

If уlt;(8) and xlt;(8) and ygt;(x-8) then write('принадлежит');

Else write(' не принадлежит');

End.

Вот и всё. Я не вижу чему одинаковы непонятки, потому поменяй 8 на подходящие величины