1. В подобных задачах главное - правильно составить ограничения на область и это задача из области математики.
Область ограничена тремя линиями - двумя прямыми и частью окружности.
Для тех, кто плохо понимает графики, есть простое правило:
"Eсли область находится выше или правее, то y > x, иначе y < x"
a) Область правее оси y дает условие x > 0.
б) Область выше наклонной прямой дает условие y > x-6
Откуда х-6 появилось? Из уравнения этой линии y=x-6. Как найти?
Прямая проходит через две точки: A(0;-6) и B(6;0).
Общий вид уравнения прямой, проходящей через две точки:
в) Уравнение окружности радиуса r с центом в начале координат имеет вид x² + y² = r², а точки внутри круга описываются условием
x² + y² < r². В нашем случае x² + y² < 36
Объединяем все три условия по "И": x>0 ∩ y>x-6 ∩ x²+y²<36</u>
И только теперь составляем программу.
// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (x,y):=ReadReal2('Введите через пробел координаты точки:');
Writeln((x>0) and (y>x-6) and (x*x+y*y<36))<br>end.
Пример
Введите через пробел координаты точки: 3 2.1
True