Помогите, пожалуйста!!!2) Требовалось написать программку, которая вводит с клавиатуры

Помогите, пожалуйста!!!
2) Требовалось написать программу, которая вводит с клавиатуры координаты точки на плоскости (x, y действительные числа) и определяет принадлежность точки заштрихованной области, включая ее границы. Программер спешил и написал программку неправильно. Вот она:
var x,y: real;
begin
readln(x,y);
if y gt;= -1 then
if y lt;= sin(x) then
if y gt;= x-1 then
write('принадлежит')
else
write('не принадлежит')
end.
а) приведите пример таких чисел x, y, при которых программка неверно решает поставленную задачку;
б) укажите, как необходимо доработать программку, чтоб не было случаев ее ошибочной работы; это можно сделать несколькими методами, потому можно указать любой метод доработки исходной программы.

Марина Таратукина 2019-07-11 19:03:24

var x,y: real;beginreadln(x,y); if (y >= -1) and  (y <= sin(x)) and  (y >= x-1) and  (x>=-pi/2) thenwrite('принадлежит') else write('не принадлежит')end.