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