Question

дана программа , нужно написать код на паскале ABC
Определить, попадает ли точка с координатами (x, y) в заштрихованную область.
(заштрихованая область треугольник с координатами а(-3,0), в(3,0), с(0,2))

Answer 1

var x,y:real;
begin
  readln(x,y);
  x:=abs(x);
  if (x<3) and (y>0) and (3*y<6-2*x) then
    writeln('попадает')
  else
    writeln('не попадает');
end.