Помогите составить программу на Паскаль для этих двух графиков

Прилагаю два исходника (отдельная программа на каждый график), образец вывода (для варианта А), и несколько уточнений на графике условий (также для варианта А), которые пригодятся для объяснений решению. Решение варианта А: Для начала необходимо "извлечь" из условий необходимую информацию, которая не очевидна на первый взгляд. Точки пересечения с осью ОУ: Исходя из вида уравнений функций у=2-х и у=4-х² получаем отклонения графиков от нуля и соответствующие точки (4 и 2) отмечаем для себя на рисунке. Оставшаяся функция пересекает оси в нуле, отмечать не стал . Точки пересечения с осью ОХ: 4-х² = 0 x1,2 = ±2 Точки пересечения между графиками функций: 1. Между параболами x² = 4 - x² x² = 2 x3,4 = ±√2 2. Между параболой "ветви вверх" и прямой x² = 2 - x x² + x - 2 = 0 x5 = -2 x6 = 1 Найдём значения функций в найденных точках и получим координаты (на рисунке зеленым цветом). Затем выделим 4 условных промежутка(грубо фиолетовыми цифрами отметил) на оси ОХ, на которых расположены заштрихованные области и опишем их в условиях операторов If (см. код) Добавим пользовательский ввод х и у, и в завершении вывод ответа о принадлежности точки одной из заштрихованных областей, чтобы проверить работоспособность. Решение варианта Б: Здесь попроще, радиус окружности равен единице (из уравнения). Сначала делаем проверку, выходит ли заданная точка за пределы окружности. Если выходит, то проверим на входимость в нижнюю область за пределами окружности. Если не выходит (т.е. находится в окружности), то разделим окружность на два интервала по оси ОХ - меньше и больше нуля, и в каждом интервале проверим на входимость в меньшие области. В остальном не отличается от решения варианта А.