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

помогите решить паскаль срочно!!!

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

    var a1,a2,z,y,x:real;

    begin

    z:=3.76;

    y:=2.122;

    x:=-8.98;

    a1:=sqr(z)+sqr(y)*x+ln(abs(x));

    a2:=sqrt(z+y)-2.756;

    writeln('Ответ: ',a1/a2);

    readln;

    end.


    Ответ: 72.8820533771124



  2. Ответ
    Ответ дан Аккаунт удален

    PascalABC.NET 3.4.2, сборка 1847 от 28.10.2018

    Внимание! Если программа не работает, обновите версию!

    begin

     var (x, y, z) := (-8.98, 2.122, 3.76);

     Println((z * z + x * y * y + Ln(Abs(x))) / (Sqrt(z + y) - 2.756))

    end.

    72.8820533771124

Самые новые вопросы