Как записать в pascal abc формулу y=cos x-sin(a*x)+x/4+sin(x+b)

Var a,b,x,y:real;
begin
writeln('введите a');
readln(a);
writeln('введите b');
readln(b);
writeln('введите x');
readln(x);
y=cos(x)-sin(a*x)+x/4+sin(x+b);
writeln ('y= ',y);
end.