Вычислить значение функции y=2sinx+5/x

Question

Вычислить значение функции y=2sinx+5/x

Answer 1

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