Напишите программу в Ассемблере y=y1+y2



4-x, если |x|<3

y1=

a+x в остальных случаях



2, если x четное

y2=

a+2, в остальных случаях

решаем относительно a: a=(-6*x2-c)/x4=-6*x2/x4-c/x4

(1*2**5)-6-7=1

трех сажаешь по углам ограждения , двух в центр 

var x,y,x1,y1,x2,y2: integer;

begin

  read(x,y,x1,y1,x2,y2);

  if (x< x1) and (x> x2) and (y< y1) and (y> y2) then

      writeln('da')

  else writeln('net');

end.