1 это задачка срочно в паскаль

1 это задачка безотлагательно в паскаль

Задать свой вопрос
1 ответ

program first;

const a = 4;

     b = 2.5;

var x, u, f: real;

begin

   writeln('Введите "х":');

   readln(x);

   if x lt;= 2.5 then begin

       u := (sqr(a) * abs(x) + exp(-x) * sin(b*x)) / (exp(a*ln(b)) - exp(-x) * sqr(cos(5*x)));

       f := exp(2*x) * (a+x) - exp(3*x*ln(b)) * ln(b-x);

       writeln('Результат выражения u: ', u:4:6);

       writeln('Итог выражения f: ', f:4:6);

   end

   else writeln('Ошибка, невозможно вычислить логарифм, "х" обязан быть меньше 2.5!');

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт