Вычислите y =5/16-/3x²+1/+8/. /-модуль нужна програма

Вот  надеюсь поможет

На Паскале:

var x,y:real;

begin

writeln('Введите значение x: ');

readln(x);

y:=5*abs(16-abs(3*sqr(x)+1)+8);

writeln('y = ',y);

end.