Почему не выводит Y и F?

program zadacha1;

const

a=3.5;

b=1.5;

var x,Y,f:real;

begin

write('x=');

read(x);

Y:=a*x*x*x*x*x*(a*x*arctan(a+x)-sqrt(abs(x-a))+ln(abs(x)+1*abs(x)+1));

F:=x*sqrt(a*x*x+b*x)+exp(-x)+ln(abs(x-a)+1);

writeln('Y,F');

end.