| 查看: 757 | 回复: 4 | ||
lijunjiexm铁虫 (小有名气)
|
[求助]
请教一个调用数据文件的程序问题，谢谢
|
|
主程序是 program main implicit none real, parameter :: PI=3.14159 real radius open(1,FILE='..\ans0402.ra') read(1,*) radius write(*,"(' 面积='f8.3)" ) radius*radius*PI end program 目的想在程序所在目录下调用radius的数值文件anso402.ra,该文件只有一个数值0.2。直接在conpaq VF6.0下运行程序，出现错误：（请帮忙看一下，谢谢！）  [ Last edited by lijunjiexm on 2011-8-6 at 00:09 ] |
回复此楼» 猜你喜欢
哪位老哥知道今年的国自然具体哪一天放榜？
已经有9人回复
-
欢迎发来filecode的Mz6后的代码验证其规律
已经有72人回复
-
咱们一起用铁证分析2026国家社科基金中标与否
已经有26人回复
-
我的国基提前知道中了，可是同事的操作让我实在接受不了，怎么会有这样的人
已经有16人回复
-
有时候，自然基金真的不能太认真 （我的申报经验）
已经有12人回复
-
招聘 金属平磨液，抛光液研发工程师
已经有3人回复
-
时间戳又变了8-15
已经有23人回复
-
filecode=后面第一个是大写字母
已经有7人回复
-
filecode
已经有12人回复
-
小木虫上这么多卖论文的，真有人买论文么？感觉没必要啊
已经有13人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 请教如何调用Module里面的函数，谢谢
已经有6人回复
- 两幅图像的曲线如何合并到一块！？
已经有29人回复
- 【求助】用fortran怎么描述下面这样的情况，我是新手，请大家帮忙
已经有8人回复
- 【求助】只是优化后文件，没有restart文件，能继续跑吗
已经有22人回复
- 【交流】VC++, C#, VB答疑专贴
已经有145人回复
- 【交流】Fortran语言答疑专帖
已经有157人回复
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
【答案】应助回帖
★ ★
lijunjiexm(金币+10): 非常感谢，对这个更清楚了些 2011-08-06 10:38:25
jjdg(金币+2): 感谢参与 2011-08-06 15:30:50
lijunjiexm(金币+10): 非常感谢，对这个更清楚了些 2011-08-06 10:38:25
jjdg(金币+2): 感谢参与 2011-08-06 15:30:50
|
我用 gfortran，表示需要将 open(1,FILE='..\ans0402.ra') 改为 open(1,FILE='../ans0402.ra') 当然，这主要是因为 gfortran 可能起源于 Linux 下的缘故…… 你试着将 ans0402.ra 放在当前源程序所在目录，然后，直接 open(1,FILE='ans0402.ra') 看看会不会有问题…… |
2楼2011-08-06 08:40:58
lijunjiexm
铁虫 (小有名气)
- 应助: 0 (幼儿园)
- 金币: 22.8
- 红花: 1
- 帖子: 182
- 在线: 87.1小时
- 虫号: 1198843
- 注册: 2011-02-03
- 专业: 常微分方程与动力系统
3楼2011-08-06 10:37:53
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
4楼2011-08-06 11:19:19
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
5楼2011-08-06 11:28:42
