作业帮求解微分方程,用matlab或mathematica解都可以,只要结果求解微分方程{2 a t[x] t'[x] + c t''[x] + a t[x]^2 t''[x] == 0,t[0] == b,t[d] == E} 其中a,c,b,d,e都是常数,用matlab或mathematica解都可以,只要结果
来源：学生作业帮助网 编辑：作业帮 时间：2024/04/29 09:49:45
![求解微分方程,用matlab或mathematica解都可以,只要结果求解微分方程{2 a t[x] t'[x] + c t''[x] + a t[x]^2 t''[x] == 0,t[0] == b,t[d] == E} 其中a,c,b,d,e都是常数,用matlab或mathematica解都可以,只要结果](/uploads/image/z/5437442-2-2.jpg?t=%E6%B1%82%E8%A7%A3%E5%BE%AE%E5%88%86%E6%96%B9%E7%A8%8B%2C%E7%94%A8matlab%E6%88%96mathematica%E8%A7%A3%E9%83%BD%E5%8F%AF%E4%BB%A5%2C%E5%8F%AA%E8%A6%81%E7%BB%93%E6%9E%9C%E6%B1%82%E8%A7%A3%E5%BE%AE%E5%88%86%E6%96%B9%E7%A8%8B%7B2+a+t%5Bx%5D+t%27%5Bx%5D+%2B+c+t%27%27%5Bx%5D+%2B+a+t%5Bx%5D%5E2+t%27%27%5Bx%5D+%3D%3D+0%2Ct%5B0%5D+%3D%3D+b%2Ct%5Bd%5D+%3D%3D+E%7D+%E5%85%B6%E4%B8%ADa%2Cc%2Cb%2Cd%2Ce%E9%83%BD%E6%98%AF%E5%B8%B8%E6%95%B0%2C%E7%94%A8matlab%E6%88%96mathematica%E8%A7%A3%E9%83%BD%E5%8F%AF%E4%BB%A5%2C%E5%8F%AA%E8%A6%81%E7%BB%93%E6%9E%9C)
求解微分方程,用matlab或mathematica解都可以,只要结果求解微分方程{2 a t[x] t'[x] + c t''[x] + a t[x]^2 t''[x] == 0,t[0] == b,t[d] == E} 其中a,c,b,d,e都是常数,用matlab或mathematica解都可以,只要结果
求解微分方程,用matlab或mathematica解都可以,只要结果
求解微分方程{2 a t[x] t'[x] + c t''[x] + a t[x]^2 t''[x] == 0,t[0] == b,t[d] == E} 其中a,c,b,d,e都是常数,用matlab或mathematica解都可以,只要结果
求解微分方程,用matlab或mathematica解都可以,只要结果求解微分方程{2 a t[x] t'[x] + c t''[x] + a t[x]^2 t''[x] == 0,t[0] == b,t[d] == E} 其中a,c,b,d,e都是常数,用matlab或mathematica解都可以,只要结果
我不得不承认我有点蛋疼……专程找了台计算机算了好几天,连我自己都快把这方程的存在给忘了,结果今天我居然发现DSolve把它给解出来了：
DSolve[{2 a t[x] t'[x] + c t''[x] + a t[x]^2 t''[x] == 0,t[0] == b,t[d] == e},t[x],x]
(*
{{t[x] -> InverseFunction[Integrate[1/(C[1] + Log[c + a*K[1]^2]),{K[1],1,#1}] & ][d - x +
Integrate[1/(C[1] + Log[c + a*K[1]^2]),{K[1],1,e}]]}}
*)
解中出现了常数C[1],同时b这个边界条件没有体现在解里,此外求解产生了警告信息bvsing,表明x = 0对于这个方程是个奇点（至少DSolve在求解过程中将它这么判定了.）推测把边界条件t[0] == b改成t[f] == b之类的可以获得一个无警告信息且无常数项的解.不过我没兴致再拿个计算机算几天了,你有兴趣可以自己试试.这个方程的求解对于内存的要求很低,就是比较慢.