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

#include <iostream>

using namespace std;

int main() {

cout.precision(10);

   double x;

   cin >> x;

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

   cout << x;

return 0;

}

_______________

Program n_1;

var x: double;

begin

   readln(x);

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

   writeln(x:0:10);

end.