Как записать это выражение на языке паскаль y=1-x^4

Program zadacha1;
var x,y,b,a:integer;
begin
write('x=');readln(x);
write('a=');readln(a);
b:=sqr(a);
y:=1-sqr(b);
writeln('y=',5:2);
readln;
end.