Помогите, пожалуйста,программа на паскале!очень срочно! Необходим график функции
Program proba;
var x, y:real;
begin
write('x=');
readln(x);
y:=(x*x+2*x+1)/(x*x+2*x);
write('y=');
writeln(y);
end.