// 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