Question

Помогите пожалуйста. Второе задание, очень нужно
Заранее благодарна

Answer 1

// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (x1,x2):=ReadReal2('Введите x1,x2 через пробел:');
  var y:=x1*x1+x2*x2;
  var z:=Sqrt(y/(y-7));
  Writeln(z)
end.

Пример
Введите x1,x2 через пробел: 3.18 2
1.40861514061281