Question

Для данных областей составить линейную программу, которая
печатает true, если точка с координатами (х, у) принадлежит
закрашенной области, и false — в противном случае:

Answer 1

Program psck;
var
x,y : integer;
begin              read(x,y);              if (y>0) and (((x<0) and (x*x+y*y<36)) or ((x*x+y*y>9) and (x*x+y*y<36)))       then write('true') else write('false');    end.