• Решить при помощи паскаль Очень надо кто решит дам еще 60 пунктов + 20 за лучшее.

    question img

Ответы 1

  • const e = 2.7182818285; //константа - число е

    var

      x, b, a, s1, s2: real; {s1 - результат вычисления 1-ой функции, s2 - 2-ой функции}begin  writeln('Введите x, b, a');  readln(x, b, a);  writeln('Исходные значения: x = ', x, ', b = ', b, ', a = ', a);  s1:= (sqr(x) * x) * sqr(sin(sqr(x + b)) / cos(sqr(x + b))) + a / sqrt(x + b);{sin / cos - это tg}  s2:= (b * sqr(x) - a) / (power(e, a * x) - 1);{функция power возводит число е в степень a * x}

      writeln('Результат вычисления 1 формулы: ', s1 : 0 : 5, ', 2 формулы: ', s2 : 0 : 5);{ : 0 : 5 - это формат вывода с точностью до 5 знаков после запятой а 0 это автоформатирование числа знаков до запятой}

    end.

    Функция power есть в компиляторах pascal ABC, pascal ABC.NET. 

          

     

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years