Помогите решить задачу Turbo Pascal. Входит ли точка в закрашенную область?

Помогите пожалуйста.

Question

Помогите пожалуйста. 
<img title="Помогите решить задачу Turbo Pascal. Входит ли точка в закрашенную область? " src="//sprtqa.b-cdn.net/download/45fc227fe11b18ad6dd346dedc79ec59_i-18.jpg" >

Владислав Владислав · Accepted Answer

Примерно так: criteria1:=x>0; criteria2:=sqr(x)+sqr(y)<1; criteria3:=(y>x-1) and (y<1); Match:=criteria1 and (criteria2 or criteria3);