Question

Переведите в паскаль

Answer 1

Sin(Sqrt(x+1))-Sin(Sqrt(x-1))

Answer 2

var
x, rez: real;
begin
readln(x);
rez := sin(sqrt(x + 1)) - sin(sqrt(x - 1));
writeln(rez);
end.