Напишите на языке паскаль программу вычисления y по формуле: y=(9+x^2-7x)^2

program RLN;var x, y: real;beginwrite ('x=');read (x);y:=(9+x*x-7*x)*(9+x*x-7*x);write ('y=');write (y);end. Только тут формула немного по-другому записана. Но результаты те же будут.