СРОЧНО Пожалуйста посчитайте!!!НА ПАСКАЛЕ.

Я думаю, как то так:

var

       x, y: Double;

begin

       Read (x, y);

       if (x >= 0) or (x <= pi) and (y <= sin (x)) and (y <= 0.5) then

               Write ('YES')

       else

               Write ('NO');

end.        

Pi - константа, число π.