Составьте программку вычисления значения функции y= x^2+2/7x-9 на PascalABC и C++

include lt;iostreamgt;

using namespace std;

int main()

cout.precision(10);

   double x;

   cin gt;gt; x;

   x=x*x+2/(7*x)-9;

   cout lt;lt; x;

return 0;

_______________

Program n_1;

var x: double;

begin

   readln(x);

   x:=x*x+2/(7*x)-9;

   writeln(x:0:10);

end.