使用mathematica解常微分方程~

问题描述:

使用mathematica解常微分方程~
y'=1/x^2 - y/x
y(1)=1
请给出mathematica语句以及解出的结果,

DSolve[{y'[x] == 1/x^2 - y[x]/x,y[1] == 1},y[x],x]
y[x] -> (1 + Log[x])/x