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

//PascalABC.Net 3.2
begin
var x:=readinteger ('Введите x: ');
write ('y=', sqr(1-x*x+5*sqr(x*x)) );
end.