用Mathematica解方程f'''[x] +0.5 f[x] f''[x]=0,初始条件是f[0] == 0,f'[

用Mathematica解方程
f'''[x] +0.5 f[x] f''[x]=0,初始条件是f[0] == 0,f'[0] == a,f'[10] == 1 - a.
哪位高手给用Mathematica给解一下
唐割睾 1年前 已收到1个回答 举报
赞

vincence 幼苗

共回答了27个问题采纳率：92.6% 举报

s = With[{a = 1(*你设定的a值*)},
NDSolve[{f'''[x] + 0.5 f[x] f''[x] == 0,f[0] == 0,f'[0] == a,
f'[10] == 1 - a},f[x],{x,0,10(*你设定的x范围*)}]];
Plot[f[x] /.s,{x,0,10(*你设定的x范围*)}]
这个微分方程用电脑好像解不出来

1年前

8
可能相似的问题

你能帮帮他们吗

精彩回答

Copyright © 2024 YULUCN.COM - 雨露学习互助 - 17 q. 0.053 s. - webmaster@yulucn.com