Question

Помогите пожалуйста! y=x/x2
1+5+x3

Answer 1

Var x,y: real;
begin
readln(x);
y:=x/(1+((x*x)/5+(x*x*x)));
writeln(y);
end.