Сделайте этот пример в паскале как его надо решать. Пожалуйста. 20 баллов даю

PascalABC.NET 3.4.0, сборка 1670 от 23.05.2018Внимание! Если программа не работает, обновите версию!begin  var x:=ReadReal('x=');  var r:=Sqrt(Abs((Sqr(x**5-3)-5)/(5*x-7))+7)+10*x;  Print(r);  r:=Round(r);  Println(r)end.Примерx= -12.50236508.4531755161 36508