| 查看: 2039 | 回复: 11 | |||
| 【有奖交流】积极回复本帖子，参与交流，就有机会分得作者 夕阳西下 的 4 个金币 ，回帖就立即获得 1 个金币，每人有 1 次机会 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[交流]
程序运行不了问题在哪
|
|||
|
下面这个程序有错误，怎么改呢？ program Ne integer :: I,J, N, Ny real:: ne(J) real:: Hx(I) N=1000 Ny=1000 Dx=0.1 Dt=0.1 n0=5E+2 m=2.1 p=2 Te=5 q=0.6E-19 E=2 k=0.514E-9 v=n0*k Hx(0)=sqrt(8*Te/pm)*ne*(1-0.25) Hx(I)=-(q/m*v)*E(ne/(1-exp(q*E*Dx/Te)+ne/(1-exp(-q*E*Dx/Te)) open (unit=10,FILE='1.txt') DO I=2,N-1 DO J=2,Ny-1 HX(I)=(H1(I+1)-H1(I-1))/(2*DX) ne(J)=(ne(J+1)-ne(J-1))/(2*Dt) ne(J)=Hx(I)+R end do end do write (10,"('N=?,Ny=?')" ne(I) stop end |
回复此楼» 猜你喜欢
各位基础老师们，看完中央《从严治党》的决定后，对学术界更加有信心了吧
已经有5人回复
-
【长期招聘】复旦大学 AI 制药实验室 博士后招聘
已经有12人回复
-
2027博士申请-临床检验诊断学、病原生物学、微生物方向
已经有5人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- matlab非线性参数拟合问题
已经有7人回复
- 【求助】程序运行已经无错误，但是输入文件有问题，求教。
已经有23人回复
- 【求助】安装问题，安装后程序无法执行
已经有12人回复
- 【求助】关于vector运行效率问题【已完结】
已经有5人回复
- 【求助】运行错误，大家看看问题在哪？
已经有7人回复
» 抢金币啦！回帖就可以得到:
-
东北大学应用经济学博士招生-2027级
+1/990
-
讨论一下
+1/293
-
坐标苏州，诚聘女友
+1/272
-
27博士申请
+1/181
-
大连理工大学化工学院郑跃楠副教授计划招收2027级博士研究生
+1/177
-
海南大学徐月山老师招收2027年第一批博士研究生1名（申请考核制）
+1/86
-
湖南大学 有机半导体方向 诚聘博士后和助理教授
+1/86
-
慢蹲一个与子偕老的爱人
+1/46
-
慢蹲一个与子偕老的爱人
+1/42
-
湖大材料院袁达飞课题组招收2027年入学从事光电研究的博士研究生一名
+1/37
-
涂层低温高湿（雨淞覆冰）测试
+1/36
-
上海知名药企招聘一位知识产权副总监/总监
+1/18
-
中国科学院赣江创新研究院-南昌大学招收27级博士生（化学、化工、材料、冶金专业）
+1/18
-
东北大学-刘卯教授课题组-金属材料方向-招收27届博士生
+1/13
-
英国贝尔法斯特女王大学药物递送方向招CSC博士生
+1/10
-
宁波诺丁汉大学招收2027年秋季入学CO2电催化方向博士生
+1/9
-
您感兴趣的遗传病是哪些？您认为产前诊断在阻断遗传病传递作用有多大？
+1/5
-
东北大学-刘卯教授课题组-招收27届博士生
+1/3
-
香港大学机械工程系Yaoye Hong课题组诚招多名全奖博士（2027秋季）、博士后及科研助理
+1/3
-
【2027博士招生】福州大学姚建年院士课题组招收博士研究生2名
+1/1
7楼2012-02-11 14:39:11
2楼2012-02-05 23:25:40
3楼2012-02-06 10:01:51
4楼2012-02-06 16:53:00