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

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

begin

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

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

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

if gt; 3 then y := x - 8;

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

end.