:
var y,x: real;
begin
writeln('Введите целое число x');
readln(x);
y:=(sqr(x)+2*x*sqr(x))/(sqr(x)+15);
write(y);
end.
var y,x: real;
begin
writeln('Введите вещественное число x');
readln(x);
y:=abs(x*sqr(x)-11)+exp((5/3)*(ln(x+7)))-exp(4*(ln(x-15)));
write(y);
end.