Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

50 БАЛЛОВ ПОМОГИТЕ ПОЖАЛУЙСТА)
НУЖНО составить программу, содержащую ветвления и определяющую, принадлежит ли точка с координатами ( X,Y) заштрихованной области.

Ответ оставил Гость

Var x,y:real;
begin
readln(x,y);
  if ((y<=7)and(y>=2)and(x>=-6)and(x<=-1)) or ((y<=2) and (y>=-3) and (x>=-6) and (x<=-3)) then writeln (Принадлежит)
  else writeln(Не принадлежит);
end.