difur.mws
>
restart;#К задаче 5 серии D3
>
m:=1:
>
eq:=m*diff(x(t),t$2)=32*sin(5*t)-32*x(t);
>
R:=dsolve({eq,x(0)=0,D(x)(0)=13},x(t));
>
evalf(subs(t=0.4,R));