С основами 4, 5, 6 и далее.
var
x,b: integer;
begin
read(x)
b:=(Abs(Sin(Sqr(x))+Cos(x)))/Power(x+2,1/3)
end.
a, c, e. Вопросы и побуждения просто отбрасываем, что осталось - высказывания.