Question

задание 2.............?

Answer 1

// PascalABC.NET 3.1, сборка 1256 от 21.06.2016
begin
  var a,b:real;
  Write('Введите через пробел a и b: '); Read(a,b);
  var y:=ArcSin(a)+ArcCos(b)+Sqrt(Abs((a-b)-Sqr(a-b)));
  Writeln(y)
end.

Тестовое решение
Введите через пробел a и b: 0.64 -0.328
2.77548026315973