Дана точка на плоскости с координатами (x,y). Составить программу которая выдаёт одно из сообщений "да", "нет", "на границе" в зависимости от того лежит ли точка вгибом заштрихованной области, вне заштрихованной области или на её границе. Области заедаются графически следующим образом

var x,y : real;beginwrite('x = '); readln(x);write('y = '); readln(y);if (y<12)and(y>abs(x))  then writeln('Да')  else if (y>12)or(y<abs(x)) then writeln('Нет')                             else writeln('На границе');end.

// PascalABC.NET 3.0, сборка 1073var  x,y:real;begin  Writeln('Введите координаты х и у: '); Read(x,y);  if (y>12) or (y<abs(x)) then Writeln('Нет')  else    if (y<12) and (y>abs(x)) then Writeln('Да')    else Writeln('На границе')end.Тестовые решения:Введите координаты х и у: -5 10ДаВведите координаты х и у: -10 5НетВведите координаты х и у: 5 5На границе