В Турбо Паскале..Вычислить следующее выражение при X = 10, Y = 3: Z = (sin37+cos73+tg23)/(x^2-2XY^2+Y^4)
^ -возведение в степень.

uses  Crt;const  Pi=3.14159265;var  x,y,z:real;begin  ClrScr;  x:=10; y:=3;  z:=sin(37*Pi/180)+cos(73*Pi/180)+sin(23*Pi/180)/cos(23*Pi/180);  z:=z/(sqr(x)-2*x*sqr(y)+sqr(sqr(y)));  Writeln(z);  ReadKeyend.Результат выполнения программы 1.3186615443E+00