Ответ:
Как то так
Объяснение:
program y_;
uses Crt;
var
A,B,x,y:real;
begin
writeln('Write A,B,X:');
readln(A,B,x);
y:=((B*sqr(sin(x)))/sqrt(abs(sin(1.6*A*3.14*power(x,3))/cos(1.6*A*3.14*power(x,3)))))+((0.7*sqr(A)*sqr(x))/12000);
writeln('y= ',y:0:2);
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Ответ:
Как то так
Объяснение:
program y_;
uses Crt;
var
A,B,x,y:real;
begin
writeln('Write A,B,X:');
readln(A,B,x);
y:=((B*sqr(sin(x)))/sqrt(abs(sin(1.6*A*3.14*power(x,3))/cos(1.6*A*3.14*power(x,3)))))+((0.7*sqr(A)*sqr(x))/12000);
writeln('y= ',y:0:2);
end.