Даны вещественные x, y, z. Вычислить в паскале а, если а=(sqr(x)+3*y-sqrt(z))/(y*sin(z)+exp(abs(x)))

Program zna4enie_a;Uses CRT;Var a, x,y,z : real;Begin CLRSCR; Writeln( ‘ введите значение x= ’ ); Readln(x); Writeln(‘ введите значение y =’ ); Readln(y); Writeln(‘ введите значение z =’ ); Readln(z); a:=(sqr(x)+3*y-sqrt(z))/(y*sin(z)+exp(abs(x))); writeln(‘ значение a= ’ , a:5:2);repeat until keypressed;END.