用mathematica求解以下问题 X''(x)+λX(x)=0 0<x<L X'(0)=0 X'(L)+hX(L)=0 h>0 给出mathematica代码

以下是使用Mathematica求解该问题的代码：

eqn = X''[x] + λ X[x] == 0;
bc1 = X'[0] == 0;
bc2 = X'[L] + h X[L] == 0;
sol = DSolve[{eqn, bc1, bc2}, X[x], x]

其中，`eqn`定义微分方程，`bc1`和`bc2`定义边界条件，`DSolve`函数求解微分方程并返回解。