Question

Помогите решить задачку в паскале ! Пожалуйста !Составить программу на языке Pascal для решения следующей логической задачи. По графику нужно написать задачу и решение, график прилагается.

Answer 1

Задача: дана точка с координатами XY, нужно определить, принадлежит ли она указанной области
Решение:
$\begin{cases} y>=-2x+4\\ y <=-x+6 \end{cases}$
var
  x, y: real;
begin
  readln(x, y);
  if not ((x >= 0) and (y >= 0) and (y >= -2 * x + 4) and (y <= -x + 6)) then
    write('не ');
  writeln('принадлежит');
end.