в паскале. нужно выделить постоянную часть и вычислить ее в константном выражении до выполнения программы. вычислить значение выражения при всех конкретно заданных значениях переменных.

 9_.bmp ( 117.55 килобайт ) Кол-во скачиваний: 506


Где 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.