restart;
I1:=Int(x*tan(x),x=0..Pi/6);

evalf(I1);

Rn:=cosh(3)*3^(2*n+3)/(2*n+3)!;

0.5*10^(-4);

evalf(subs(n=5,Rn));

evalf(subs(n=6,Rn));

evalf(subs(n=7,Rn));

ax:=(0.5*10^(-4)*7!/cosh(3))^(1/7);

evalf(ax);