Ребят плизз составьте программу y=3x-7+x^2
Program f3; var y, x: real; begin read( x); y:=3*x-7+sqr(x); writeln(y); end.