несколько раз пыталась сделать, но все время в паскале выдает разные ошибки, если не сложно кто-нибудь решите, пожалуйста!
Приложения:
Ответы на вопрос
Ответил Аноним
0
// PascalABC.NET
var
a,c,x,f,y:real;
begin
Write('a,c,x,f=');
Read(a,c,x,f);
y:=7*Sqrt(Power(a,5)-4*c)*Cos(Sqr(Tan(5)))/
(Sin(2)*Power(Cos(x-a*a),4))*
Power(a,2*x+1)*Sqrt(Abs(Cos(Sin(x*x))));
Writeln('y=',y)
end.
Результат
a,c,x,f=5 3 3 3
y=13459606.2123948
var
a,c,x,f,y:real;
begin
Write('a,c,x,f=');
Read(a,c,x,f);
y:=7*Sqrt(Power(a,5)-4*c)*Cos(Sqr(Tan(5)))/
(Sin(2)*Power(Cos(x-a*a),4))*
Power(a,2*x+1)*Sqrt(Abs(Cos(Sin(x*x))));
Writeln('y=',y)
end.
Результат
a,c,x,f=5 3 3 3
y=13459606.2123948
Ответил RZ06
0
спасибо большое
Ответил Аноним
0
Пожалуйста
Новые вопросы