Question

Составьте программу для вычисления выражения в Паскале x=sin 2y+cos 2z/корень из sin y*cos z

Answer 1

Поскольку автор вопроса не откликается, а представленное в вопросе выражение может интерпретироваться по-разному, было принято решение записать формулу "как есть", т.е. в предположении, что она записана верно и скобки в ней не были нужны.

$\displaystyle x=\sin 2y+ \frac{\cos 2z}{\sqrt{\sin y}}\cos z$

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (y,z):=ReadReal2('Введите y и z:');
  var x:=Sin(2*y)+Cos(2*z)/Sqrt(Sin(y))*Coz);
  Writeln('x=',x)
end.

Answer 2

Prograg zd0;
Var x,y,z:integer;
Begin
Readln(y,z);
x:=SIN(2*y)+(COS(2*z)/SQRT(SIN(y)*COS(z)));
Writeln(x);
enb.

Answer 3

Для вычисления выражения x = sin(2*y) + cos(2*z) / sqrt(sin(y) * cos(z)) в языке программирования Паскаль, вы можете использовать следующий код:

pascalCopy code
program CalculateExpression;

uses
  Math;

var
  x, y, z: Double;

begin
  // Ввод значений переменных y и z
  Write('Введите значение y: ');
  ReadLn(y);
  Write('Введите значение z: ');
  ReadLn(z);

  // Вычисление выражения
  x := sin(2 * y) + cos(2 * z) / sqrt(sin(y) * cos(z));

  // Вывод результата
  WriteLn('Результат вычисления: ', x);

  // Ожидание нажатия клавиши перед выходом
  ReadLn;
end.

Этот код сначала запрашивает у пользователя значения переменных y и z, затем вычисляет выражение и выводит результат. Вы можете выполнить эту программу в среде Pascal или компилировать ее, чтобы получить исполняемый файл, который можно запустить на вашем компьютере.