Landanius 23 октября 2019 в 10:41
Нужна помощь c 11. nujno sostavit' programmu v paskale. ochen' bol'choe zaranee spasibo) (y=3,4)
pojaluista kto mojet bistree
Нужна помощь c 11. nujno sostavit' programmu v paskale. ochen' bol'choe zaranee spasibo) (y=3,4)
pojaluista kto mojet bistree
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.
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.
Компьютеры и вычисления
67
46
Для комментирования необходимо зарегистрироваться на сайте