Задачки на определение принадлежности точки области Для каждой задачи составить программу

Задачи на определение принадлежности точки области Для каждой задачи составить программку содержащую ветвления и определяющую принадлежит ли точка с координатами x, y заштрихованной области

Задать свой вопрос
2 ответа
Var x,y:real;
Begin
Write('x = ');ReadLn(x);
Write('y = ');ReadLn(y);
if (ygt;=5-x)and(ylt;=11-x)and(ygt;=x-3)and(ylt;=x+3) then Write('Принадлежит')
else Write('Не принадлежит')
End.
Var x,y:real;
Begin
Write('x = ');ReadLn(x);
Write('y = ');ReadLn(y);
if (ygt;=5-x)and(ylt;=11-x)and(ygt;=x-3)and(ylt;=x+3) then Write('Принадлежит')
else Write('Не принадлежит')
End.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт