Вычислить значение функции F(x) - Pascal ABC (13041)

Формулировка задачи:

Вычислить значение функции F(x), которая равна 1/x²+8 для всех допустимых значений x и равна x²+3x+9 в противном случае. Хочу понять как написать эту программу, понимаю только что нужно использовать if, но кроме этого ничего не могу понять. Если вы мне поможете написать программу и объясните как такое писать на будущее буду очень сильно благодарен.

Решение задачи: «Вычислить значение функции F(x)»

Листинг программы

var
    x: Double; //Real;
begin
    Write('Input x='); ReadLn(x);
    Write('y=');
    Write('F(', x:0:2, ')=', (1 / (Sqr(x) + 8)):0:2);
end.

Объяснение кода листинга программы

В данном коде происходит следующее:

Объявляется переменная x типа Double, которая будет использоваться для хранения значения x.
Выводится сообщение «Input x=» для информирования пользователя о необходимости ввести значение x.
Считывается значение x с помощью функции ReadLn().
Выводится сообщение «y=» для информирования пользователя о необходимости ввести значение y.
Считывается значение y с помощью функции ReadLn().
Вычисляется значение функции F(x) с использованием формулы (1 / (Sqr(x) + 8)) и типа Double.
Выводится результат вычисления функции F(x) с использованием функции Write().
Конец программы.