Нужна помощь c 11. nujno sostavit' programmu v paskale. ochen' bol'choe zaranee spasibo)...

Question

Нужна помощь c 11. nujno sostavit' programmu v paskale. ochen' bol'choe zaranee spasibo) (y=3,4)
pojaluista kto mojet bistree

---

Answer 1

Var
    x, y, z, a, b: real;

begin
    readln(x, y, z);
    a := x * x * x * sqr(Tan(sqr(x + y))) + z / sqrt(x + z);
    b := (y * x * x - z) / (exp(z * x) - 1);
    writeln('a=', a);
    writeln('b=', b);
end.