Решить в паскале. f(x)=система x^4+9 если x< 3,2 и 54x^4/-5x^2+7 если x≥3,2

Var x,s :integer;
begin
readln(x);
if x<3,2 then s:=(x*x*x*x)+9 else s:=(54*(x*x*x*x))/(-5*(x*x)+7);
writeln(s);
end;