в паскале. нужно выделить постоянную часть и вычислить ее в константном выражении до выполнения программы. вычислить значение выражения при всех конкретно заданных значениях переменных.
9_.bmp ( 117.55 килобайт )
Кол-во скачиваний: 494
Где t – любое целое; x=2,4; x=5,12
заранее огромное спасибо!!!!!!
Program E92;
Const
c= 2/(sqr(t)+1)
t:= Integer;
Var
x,z:= Real;
Begin
x:=2.4
z:=sqrt((t)*sqr(sin(4*x))+sqr(cos(5*x))/ln(abs((35+8/9)*x/(15+2/7-3+7/9))
writeln('x= ', x, 't= ', t, 'y= ', y);
x:=5.12
z:=sqrt((t)*sqr(sin(4*x))+sqr(cos(5*x))/ln(abs((35+8/9)*x/(15+2/7-3+7/9))
end.
Так что Вы хотите от нас?
Русская версия Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)