| 查看: 701 | 回复: 11 | ||||
| 当前主题已经存档。 | ||||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | ||||
woshilsh荣誉版主 (职业作家)
|
[交流]
【求助】一个简单的fortran程序也错误？（答谢500金币）【已解决】
|
|||
|
用的版本compaq visual fortran v 6.6 程序如下： program woshilsh parameter (N=10000,pi=3.1415927) real B(0:N),u1(0:N),u2(0:N) end 错误就那一个，都是相同的，高手帮忙解答下了！ [ Last edited by nono2009 on 2009-11-27 at 09:20 ] |
回复此楼» 猜你喜欢
329求调剂
已经有8人回复
-
070305高分子化学与物理 304分求调剂
已经有8人回复
-
349求调剂
已经有5人回复
-
一志愿北京理工大学本科211材料工程294求调剂
已经有7人回复
-
291求调剂
已经有4人回复
-
0856材料化工调剂 总分330
已经有14人回复
-
352分-085602-一志愿985
已经有5人回复
-
各位老师好，我的一志愿为北京科技大学085601材料专硕
已经有8人回复
-
求调剂，一志愿 南京航空航天大学 ，080500材料科学与工程学硕，总分289分
已经有4人回复
-
279求调剂
已经有4人回复
woshilsh
荣誉版主 (职业作家)
- 应助: 43 (小学生)
- 贵宾: 10.33
- 金币: 21115.1
- 散金: 737
- 红花: 22
- 帖子: 3777
- 在线: 639.7小时
- 虫号: 293038
- 注册: 2006-11-04
- 专业: 计算机应用技术
- 管辖: 仿真模拟
|
第24行，i=0时对应t=0, i=N/4对应t=pi/4, i=N/2 对应t=pi/2, i=3N/4对应t=3pi/4, i=N 对应t=pi 分别设不同的i值，然后运行程序，就能得到每个x值下对应的u1，和u2，保存在文本文件内。这样就可以画图了 即第一次i=0 -> 运行 ->去生成的2个文本文件分别读取 u1，u2（这个得到的是纵坐标），至于横坐标，你可以用我给你发的EXCEL文件里面第一列的数据，横坐标是一直不变的 你每次改变i的值，只是得到不同的u1，u2 我这个是用最简单的2维画图，但已经很清楚反应问题的物理意义了。如果要生成三维图，即u1，u2为纵轴，x，t分别为2个横轴，程序需要改一点点。我建议找个稍微懂FORTRAN的人，当面一问就很清楚了 这是另外一个人的解答，后面的他让我继续问问别人，所以有劳maomao美女了哈！呵呵 |
8楼2009-11-26 13:12:54
nono2009
超级版主 (文学泰斗)
No gains, no pains.
-
专家经验: +21105 - 应助: 28684 (院士)
- 贵宾: 513.911
- 金币: 2555230
- 散金: 27828
- 红花: 2148
- 沙发: 66666
- 帖子: 1602255
- 在线: 65200.9小时
- 虫号: 827383
- 注册: 2009-08-13
- 性别: GG
- 专业: 工程热物理与能源利用
- 管辖: 科研家筹备委员会
2楼2009-11-26 12:13:31
woshilsh
荣誉版主 (职业作家)
- 应助: 43 (小学生)
- 贵宾: 10.33
- 金币: 21115.1
- 散金: 737
- 红花: 22
- 帖子: 3777
- 在线: 639.7小时
- 虫号: 293038
- 注册: 2006-11-04
- 专业: 计算机应用技术
- 管辖: 仿真模拟
3楼2009-11-26 12:30:33
nono2009
超级版主 (文学泰斗)
No gains, no pains.
-
专家经验: +21105 - 应助: 28684 (院士)
- 贵宾: 513.911
- 金币: 2555230
- 散金: 27828
- 红花: 2148
- 沙发: 66666
- 帖子: 1602255
- 在线: 65200.9小时
- 虫号: 827383
- 注册: 2009-08-13
- 性别: GG
- 专业: 工程热物理与能源利用
- 管辖: 科研家筹备委员会
Done
★ ★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖交流
波不动(金币+3,VIP+0):找到问题，嘉奖！ 11-26 13:06
小木虫(金币+0.5):给个红包，谢谢回帖交流
波不动(金币+3,VIP+0):找到问题，嘉奖！ 11-26 13:06
beforeprogram woshilsh after (program前要缩进或空格) program woshilsh [ Last edited by nono2009 on 2009-11-26 at 13:03 ] |
4楼2009-11-26 13:00:47
5