Question

Составить программу, содержащую ветвления и определяющую, принадлежит ли точка с координатами (X,Y) заштрихованной области.

Answer 1

взяли за заштрихованную область у>=-100

var
    x, y: real;

begin
    readln(x, y);
    if y = -100 then writeln('на границе')
    else if y > -100 then writeln('внутри')
    else writeln('снаружи ');
end.