Question

Создайте программу для вычисления значения y. Язык программирования Pascal

Answer 1

===== PascalABC.NET =====

begin

 var (a, b) := (2.5, -4.01);

 var x := Cos(a+b) / (b * b + 5 * a);

 var y := Sqrt(Abs(Sin(x) - Cos(x)))+Sqr(Tan(x - 5));

 Println(y)

end.