подскажите пожалуйста решение примера , его надо решить в PASCAL ABC
а я понятия не имею как это делать
Приложения:
![](https://st.uroker.com/files/629/629391963d1e53a4567109bb6cf806e8.jpg)
Ответы
Ответ дал:
0
begin
Writeln('Введите x, y, z:');
var(x, y, z) := ReadInteger3();
var a := (3 + Exp(y - 1)) / (1 + x * x * Abs(y - Tan(z)));
var b := (y - x) ** 2 / 2 + Abs(y - x) ** 3 / 3;
var c := a * a * Sqrt(Abs(a - b));
WriteFormat('a = {0}, b = {1}, c = {2}', a, b, c)
end.
Ответ дал:
0
третья строка скорее всего var (x, y, z) := ReadReal3(); замените
Вас заинтересует
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад