Wolfram Language

Calcul infinitésimal numérique et symbolique

Résolvez une équation intégro-différentielle

Résolvez une équation intégro-différentielle.

In[1]:=
Click for copyable input
eqn = Derivative[1][y][x] == 1 + Sin[a x] + \!\( \*SubsuperscriptBox[\(\[Integral]\), \(0\), \(x\)]\(y[ t] \[DifferentialD]t\)\);

Obtenez la solution générale.

In[2]:=
Click for copyable input
sol1 = DSolveValue[eqn, y[x], x]
Out[2]=

Spécifiez une condition initiale pour obtenir une solution particulière.

In[3]:=
Click for copyable input
init = y[0] == -1;
In[4]:=
Click for copyable input
sol2 = DSolveValue[{eqn, init}, y[x], x]
Out[4]=

Tracez la solution.

In[5]:=
Click for copyable input
Plot[Table[sol2, {a, -1, 4, 0.7}] // Evaluate, {x, 0, 3}]
Out[5]=

Exemples connexes

de en es ja ko pt-br zh