
Cheemil
6 год назад
Составить на языке PASCAL программу вычисления значения функции:
D = y⁵ - x¹² + cos⁹ v⁷
Огромное спасибо, здоровья, счастья и любви))
ОТВЕТЫ

Tiakadaz
Jul 1, 2019
Вот) Тут используется формула 
var
D, y, x, v: real;
begin
writeln(Enter x, y and v:);
readln(x, y, v);
y := exp(5*ln(y)); { y^5 }
x := exp(12*ln(x)); { x^12 }
v := exp(7*ln(v)); { v^7 }
v := exp(9*ln(cos(v))); { cos(v^7)^9 }
writeln(x, , y, , v);
end.
var
D, y, x, v: real;
begin
writeln(Enter x, y and v:);
readln(x, y, v);
y := exp(5*ln(y)); { y^5 }
x := exp(12*ln(x)); { x^12 }
v := exp(7*ln(v)); { v^7 }
v := exp(9*ln(cos(v))); { cos(v^7)^9 }
writeln(x, , y, , v);
end.
208