Mathematica uses BesselJ[0,n] and BesselJ[1,n] notation for the Bessel functions.
Mathematica uses Sum[expression,{n,1,Infinity}] notation for an infinite sum over n.
Mathematica uses various different methods, like Solve[expression==0,b], for finding zeros of expressions.
Can you attempt to express your problem using equations and some of this notation?