profile
Опубликовано 6 лет назад по предмету Информатика от LSM54

Срочно нужна помощь! Программа в Паскаль

  1. Ответ
    Ответ дан MrMiner1

    Номер 18.1

    Program n_1;

    uses math;

    var x, y, z, a: double;

    begin

       x:=1.542;

       y:=-3.261;

       z:=80.005;

       a:=ln(sqrt(exp(x-y)+x*abs(y)+z))/ln(10);

       writeln(a:0:2);

    end.

    Номер 18.2 (x - радианная мера угла)

    Program n_2;

    uses math;

    var x, b: double;

    begin

       x:=1.542;

       b:=(x/sin(x))-(x*x*x)/(sin(x)*sin(x)*sin(x))+(x*x*x*x*x)/(sin(x)*sin(x)*sin(x)*sin(x)*sin(x));

       writeln(b:0:2);

    end.

    1. Ответ
      Ответ дан LSM54
      Еще я не очень разбираюсь в типах данных.. Double на Real нельзя заменить?
    2. Ответ
      Ответ дан MrMiner1
      Я как бы тоже в паскале не очень, я по другим языкам
    3. Ответ
      Ответ дан MrMiner1
      Ну double на real можно заменить
    4. Ответ
      Ответ дан MrMiner1
      работать будет
    5. Ответ
      Ответ дан LSM54
      Хорошо. Мне бы не хотелось вас напрягать,но есть еще одна задача,где возникли вопросы.Решение есть,но оно не проходит https://znanija.com/task/31694943. Если вам не удобно можете не смотреть.
Самые новые вопросы