Question

Вариант № 2

(в турбо паскале)
Составить блок схему алгоритма и программу для вычисления функции по формуле с двойной точностью для произвольных исходных данных:

Answer 1

Ответ:

Как то так

Объяснение:

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.