Для каждой задачи составить программу, содержащую ветвления и определяющую приеадлежит ли точка с координатами (X, Y) заштрихованной области. (Задача 22)
ОТВЕТ
вроде так
var x, y:real;
begin
read(x, y);
if ((x > 2) and (y < 7*(1 - x/6)) and (y > (5*x - 22)/3)) then
writeln('Принадлежит')
else
writeln('Не принадлежит')
end.