+ (b) We can describe the motion of the mass as a position vector p(t) using circular functions.

Input := 


p[t_] = {5 Sin[2/5 t], 5 Cos[2/5 t]};

- We further compute the time at which the mass arrives at (5, 0) as a check on our parametric representation.

Input := 

stoptime = t/.FindRoot[p[t][[1]] == 5,{t,3}][[1]]//N
Output =


3.92655

- We plot the motion of the mass.

Input := 

ParametricPlot[p[t],{t,0, time},AspectRatio->Automatic]
Output =


-Graphics-