program CalculateExpression;uses math;
var x, y, z: real;
beginwriteln('Enter the value of y: ');readln(y);writeln('Enter the value of z: ');readln(z);
x := sin(2y) + cos(2z) / sqrt(sin(y)*cos(z));
writeln('The result of the expression is: ', x:0:2);end.
program CalculateExpression;
uses math;
var x, y, z: real;
begin
writeln('Enter the value of y: ');
readln(y);
writeln('Enter the value of z: ');
readln(z);
x := sin(2y) + cos(2z) / sqrt(sin(y)*cos(z));
writeln('The result of the expression is: ', x:0:2);
end.