написать на языке паскаль программу вычисления у по формуле: y=(1-x^2 + 5x^4)^4 где х целое число

Program calc;Var x,y: real;BeginWrite('Первое число:');readln (x);y := (1-x*2+5*x*4)*2;//  y := pow( (1-x*x+5*pow(x,4) ) ,2); или так если там степениWrite ('Результат:',y);End.