Регистрация Спросить otvet5GPT
Popopoghdhz
04.05.2021 22:19
Информатика
Есть ответ 👍

Дано значение угла α в радианах (0 < α < 2·π). определить значение этого же угла в градусах, учитывая, что 180° = π радианов. в качестве значения π использовать 3.14.

261
482
Посмотреть ответы 1

Ответы на вопрос:

EnglishGod
EnglishGod
4,5(74 оценок)
Версия языка не указана, поэтому сделал в самой последней и в самой старой, которая нашлась. // pascalabc.net 3.0 function f(a, b, x: double): = (1 + power(a, x)) / ((b - x) * power(sin(x), 3)); const   a = 3.45; b = 1.62; var   x : = 0.1; xe : = 3.1; h : = 0.15;   y, xn, yn, xp, yp: double; begin   yp : = maxdouble; yn : = yp;   repeat       y : = f(a, b, x);       if y > 0 then       begin if y < yp then begin yp : = y; xp : = x end end       else       if y < 0 then       begin if y < yn then begin yn : = y; xn : = x end end;       x += h;   until x > xe;   writeln('минимальное отрицательное ', yn, ' при х=', xn);   writeln('минимальное положительное ', yp, ' при х=', xp) end. тестовое решение: минимальное отрицательное -446219.37704747 при х=3.1 минимальное положительное 11.837734702392 при х=0.85 { borland pascal 7.01 } {$g+} {$n+} uses crt; function f(a,b,x: double): double; begin   f: =(1+exp(x*ln(/((b-x)*exp(3*ln(sin( end; const   a = 3.45; b = 1.62; var   x,xe,h,y,xn,yn,xp,yp: double; begin   clrscr;   x : = 0.1; xe : = 3.1; h : = 0.15;   yp : = 1e308; yn : = yp;   repeat       y : = f(a, b, x);       if y > 0 then       begin if y < yp then begin yp : = y; xp : = x end end       else       if y < 0 then       begin if y < yn then begin yn : = y; xn : = x end end;       x : = x + h;   until x > xe;   writeln('минимальное отрицательное ', yn, ' при х=', xn);   writeln('минимальное положительное ', yp, ' при х=', xp);   readkey end.    тестовое решение: минимальное отрицательное -4.46219377047470e+0005 при х= 3.10000000000000e+0000 минимальное положительное  1.18377347023920e+0001 при х= 8.50000000000000e-0001

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!

  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS