用mathematica求微分方程时总是报错，
DSolve[{y1'[x]==y2[x]*y3[x],y2'[x]==y1[x]*y3[x],y3'[x]-0.51*y1[x]*y2[x]==0,y1[0]==0,y2[0]==1,y3[0]==1},{y1[x],y2[x],y3[x]},x]
\:6B63\:5728\:8BA1\:7B97In[39]:= DSolve::deqn: 在第一个参数 {(y1^\[Prime])[x]==y2[x] y3[x],(y2^\[Prime])[x]==y1[x] y3[x],True,y1[0]==0,y2[0]==1,y3[0]==1} 中应该使用方程或者方程列表，而不是 True.
Out[39]= DSolve[{(y1^\[Prime])[x]==y2[x] y3[x],(y2^\[Prime])[x]==y1[x] y3[x],True,y1[0]==0,y2[0]==1,y3[0]==1},{y1[x],y2[x],y3[x]},x]

#春节表情包#

总是出现：DSolve::deqn: 在第一个参数 {(y1^\[Prime])[x]==y2[x] y3[x],(y2^\[Prime])[x]==y1[x] y3[x],True,y1[0]==0,y2[0]==1,y3[0]==1} 中应该使用方程或者方程列表，而不是 True.

我的代码：DSolve[{y1'[x]==y2[x]*y3[x],y2'[x]==y1[x]*y3[x],y3'[x]-0.51*y1[x]*y2[x]==0,y1[0]==0,y2[0]==1,y3[0]==1},{y1[x],y2[x],y3[x]},x]

看是不是这个问题Clear@Derivative
https://tieba.baidu.com/p/4850533592

要学会看错误
错误说的很明白, 你的方程列表里, 第三个等式, 值为True
很明显, 你在某个时候给y3'[0]赋值了, 因为=和==一时手误就很容易写错