Составить программу для вычисления данного выражения:Y=4x/(x^2-4)+1/(x-4)

begin
  var x:=ReadReal('x=');
  var y:=4*x/(x*x-4)+1/(x-4);
  Writeln('y=',y)
end.


x= 3.18
y=0.861503445215722