Нужно из этого примера сделать в паскале программу.

var

x,y :real;

begin

x:=1.1;

y:=Power(Power(Exp(x)+Power(Ln(x)+Sin(x),1/3),1/5)+Exp(x)+Power(Ln(x)+Sin(x),1/3),Cos(x))/Sqrt(Exp(x)+Power(Ln(x)+Sin(x),1/3));

write(y);

end.

Результат работы программы- число 1.0671553464184  (в задании этот результат округлён до пяти цифр после запятой)

x1 x2 x3 x4 x2∧x4 ¬x1 ¬x1∨x3 x2∧x4∧(¬x1∨x3) ¬x2∧x4∧(¬x1∨x3) ¬x1∧x2 ¬x3 ¬x1∧x2∧¬x3 x4∨¬x1∧x2∧¬x3 ¬x2∧x4∧(¬x1∨x3)∧(x4∨¬x1∧x2∧¬x3) x1∧x2 ¬x1∧x2 ¬x2∧x4∧(¬x1∨x3)∧(x4∨¬x1∧x2∧¬x3)∧¬x1∧x2 ¬x2∧x4∧(¬x1∨x3)∧(x4∨¬x1∧x2∧¬x3)∧¬x1∧x2≡1

0 0 0 0 0 1 1 0 1 0 1 0 0 0 0 1 0 0

0 0 0 1 0 1 1 0 1 0 1 0 1 1 0 1 1 1

0 0 1 0 0 1 1 0 1 0 0 0 0 0 0 1 0 0

0 0 1 1 0 1 1 0 1 0 0 0 1 1 0 1 1 1

0 1 0 0 0 1 1 0 1 1 1 1 1 1 0 1 1 1

0 1 0 1 1 1 1 1 0 1 1 1 1 0 0 1 0 0

0 1 1 0 0 1 1 0 1 1 0 0 0 0 0 1 0 0

0 1 1 1 1 1 1 1 0 1 0 0 1 0 0 1 0 0

1 0 0 0 0 0 0 0 1 0 1 0 0 0 0 1 0 0

1 0 0 1 0 0 0 0 1 0 1 0 1 1 0 1 1 1

1 0 1 0 0 0 1 0 1 0 0 0 0 0 0 1 0 0

1 0 1 1 0 0 1 0 1 0 0 0 1 1 0 1 1 1

1 1 0 0 0 0 0 0 1 0 1 0 0 0 1 0 0 0

1 1 0 1 1 0 0 0 1 0 1 0 1 1 1 0 0 0

1 1 1 0 0 0 1 0 1 0 0 0 0 0 1 0 0 0

1 1 1 1 1 0 1 1 0 0 0 0 1 0 1 0 0 0

Объяснение:

вроде так