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.

Answer 2

Программа на языке Паскаль для функции F(x) = sin(1/x) + 2 может выглядеть следующим образом:

program SinFunction;

uses
  math;

function F(x: Real): Real;
begin
  F := sin(1 / x) + 2;
end;

var
  x: Real;
begin
  writeln('Введите значение x:');
  readln(x);
  writeln('F(x) = ', F(x));
end.

В данной программе определена функция `F`, которая принимает вещественное значение `x` и возвращает результат вычисления функции `F(x) = sin(1/x) + 2`. Затем в основной части программы пользователю предлагается ввести значение `x`, после чего программа выводит результат вычисления функции `F(x)`.

Примечание: Пожалуйста, обратите внимание, что данная программа не обрабатывает возможные ошибки, такие как деление на ноль при `x = 0`. Если вам необходимо добавить обработку таких ситуаций, вы можете использовать условные операторы или исключения.

Надеюсь, это поможет вам! Если у вас возникнут еще вопросы, не стесняйтесь задавать.