• Люди добрые, на помощь!

    ______________________


    Вычислить в Паскаль:


    1. y = x - x³\3 + x⁵\5

    2. y = 2⁻ˣ - cosx + sin (2xy)

    3. y = x²-7x+10\x²-8x+12

    4. y = x - 10sinx + | x⁴ - x⁵ |


    Нужно написать коды программ и результаты их работы

Ответы 3

  • А можно результаты работы программ?
    • Автор:

      xiomara
    • 6 лет назад
    • 0
  • Я Вас очень прошу! Если Вам не сложно....Помогите мне тоже, пожалуйста...( https://znanija.com/task/31209029
    • Автор:

      dash
    • 6 лет назад
    • 0
    1. program task31177829;
    2. var
    3.  y: real;
    4.  x: integer;
    5. begin
    6.  Writeln('ПЕРВОЕ ЗАДАНИЕ: ');
    7.  Readln(x);
    8.  y := x - (Power(x, 3)/3) + (Power(x, 5)/5);
    9.  Writeln('Y = ', y);
    10.  Writeln('ВТОРОЕ ЗАДАНИЕ: ');
    11.  // если здесь всё-таки sin(2*x*y), то пишем Sin(2*x*y)
    12.  // в таком случае оно возьмёт значение y из предыдущих расчётов
    13.  Readln(x);
    14.  y := Power(2, -x) - Cos(x) + Sin(2*x);
    15.  Writeln('Y = ', y);
    16.  Writeln('ТРЕТЬЕ ЗАДАНИЕ: ');
    17.  Readln(x);
    18.  y := (Power(x, 2) - 7*x + 10)/(Power(x, 2) - 8*x + 12);
    19.  Writeln('Y = ', y);
    20.  Writeln('ЧЕТВЁРТОЕ ЗАДАНИЕ: ');
    21.  Readln(x);
    22.  y := x - 10*Sin(x) + Abs(Power(x, 4) - Power(x, 5));
    23.  Writeln('Y = ', y);
    24. end.

    во втором примере синус принимает переменную Y как прошлое значение? если так, то на 14 строке измените на:

    1. y := Power(2, -x) - Cos(x) + Sin(2*x*y);
  • Добавить свой ответ

Войти через Google

или

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

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

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