составить программу в паскале F(x)=sin1/x+2

Question

составить программу в паскале F(x)=sin1/x+2

Answer 1

var f,x,a,b: real;
begin
readln(x);
f:=(sin(1))/(x+2);
write(f)
end.