Вычислить значение функции: x^2+5, при x>3 x-8, при x<=3

var x, y: integer; / /Заводим по переменной для ввода и вывода.

begin

writeln ('Введите x'); / /Запрашиваем x на ввод.

readln (x); / /Вводим x.

if x > 3 then y : = (x * x) + 5 else / /Проверяем условия.

if > 3 then y : = x - 8;

writeln ('Решением функции является число ', y); / /Выводим ответ.

end.