Вычислите. Объясните, как вы получили значения выражений. Как найти число, следующее за числом 201? предыдущее числу 500? Назовите наибольшее

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