| 查看: 1195 | 回复: 9 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
[交流]
【求助】输入是什么？
|
|||
|
请教一下大家，如下这样一个输入片段，到底输入文件应该如何命名？运行总是没有输出。请路过高手帮解答解答，感激不尽！ C---> INPUT EXPERIMENTAL DATA WRITE(*,*)'elem ?' READ(*,'(A2)')elem WRITE(FILM1,'(4A,2A,3A)')'ab-',elem,'.IN' OPEN(1,FILE=FILM1,status='old') READ(1,*) READ(1,*) READ(1,*)a,b,c,d,e,f,g,h .......... |
回复此楼» 猜你喜欢
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有5人回复
-
售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急
已经有6人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急
已经有3人回复
-
售SCI文章，我:8O5.5.1.O.54,科目齐全,可+急
已经有5人回复
-
售一区SCI文章T0P，我:8O.551.O54,科目全,可十急
已经有3人回复
-
售SCI一区文章，我:8O5.5.1.O5.4,科目全,可伽急
已经有5人回复
-
售SCI一区T0P文章，我:8.O55.1.O.54,科目全,可十急
已经有5人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急
已经有5人回复
-
售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急
已经有5人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.5.4,科目全,可+急
已经有4人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 【求助】DMA 应力应变曲线中应变从负值开始是什么原因？？？
已经有9人回复
- 【求助】热力学软件计算共格错配度的原理是什么？
已经有0人回复
- 【求助完毕】程序表示什么意思？
已经有5人回复
- 【求助】为什么要单独计算态密度呢？
已经有8人回复
- 【求助】晶格优化崩溃？
已经有1人回复
- 【求助】这是什么错误？
已经有6人回复
- 【求助】含时密度泛函（TD-DFT）在gaussian的输入文件中如何表示？
已经有7人回复
- 【求助】CASTEP中的STM profile计算无法选择导出文件？Results file selector？
已经有9人回复
- 【求助/交流】多肽鉴定结果中SEQ ID NO的意思是什么？
已经有1人回复
- 【求助】abinit用服务器算出错？
已经有7人回复
- 【求助】为什么使用readisotopes时老是出现2070错误？
已经有12人回复
- 【求助】TRANSIESTA计算输运和gDFTB有什么不同？
已经有1人回复
- 【求助】光伏组件是恒流源还是恒压源？
已经有8人回复
- 【求助】请什么源极输入,什么又是漏极输入？有什么区别吗？
已经有1人回复
- 【求助】怎样让abinit跑起来？
已经有11人回复
- 【求助】SYBYL-分子读入后COMFA不能给出数值时什么原因？
已经有6人回复
- 【求助】使用M02-2X方法的输入文件是什么？
已经有4人回复
- 【求助】G03中有VSXC方法吗？为什么我一输入进去就link died？
已经有6人回复
- 【求助】用什么软件能够输入结构计算pKa值？？
已经有2人回复
- 【求助】如何在Word里输入一个好看的积分符号？
已经有24人回复
- 【求助】为什么我这个程序编译都没有问题，就是运行不出来？【已完结】
已经有9人回复
- 【求助】为什么相同的输入结构和计算方法在G03中可以运行，在G09就报错啊？
已经有10人回复
- 【求助】请问一下，我用VASP算SmFe磁性出现错误是什么原因?
已经有6人回复
- 【求助】为什么要这么做结构优化？
已经有3人回复
- 【求助】请问orca的可视化软件有什么？
已经有7人回复
» 抢金币啦！回帖就可以得到:
-
项目结题验收，希望一切顺利
+1/978
-
诚征女友
+1/468
-
浙大物院表面物理课题组长期招收普博及直博学生
+2/446
-
华南理工大学 光电材料方向 王竣可教授课题组招聘博士后、博士生及科研助理
+5/430
-
中国科学院上海有机化学研究所左智伟课题组招收2027年入学博士研究生
+1/82
-
中科院化学所韩布兴院士团队诚聘光催化、光酶催化、光电催化领域博士后1-2名
+1/76
-
江南大学（211）招收2027年低空技术与工程、土木工程专业推荐免试研究生
+2/58
-
山东征女友，坐标济南
+1/37
-
石河子大学211双一流学科分子筛等多孔材料与生物质资源化利用方向招2027级推免生
+1/31
-
招收 哈工大深圳﹣大湾区大学联合培养博士生1名，2027年入学
+1/26
-
浙江师范大学引进人才被解聘，拒绝支付50万绩效并被索赔211万
+1/25
-
27博士申请自荐
+1/21
-
招收2027年-申请考核博士生-仿生材料/生物能源方向
+1/11
-
中科院西北研究院招收遥感、地信相关专业联培研究生及科研助理！
+1/11
-
北理工集成电路杰青团队 | 诚招科助理
+1/5
-
【特刊征稿】BM临床诊断与治疗生物功能材料专题（Scopus、DOAJ 收录）
+1/5
-
沙特KFUPM全固态锂硫电池方向 Postdoctoral Fellow，2026年9月30日截止
+1/5
-
【牙科生物材料特刊征稿】对牙科方向友好（Scopus、DOAJ收录的正规国际期刊）
+1/4
-
北京理工大学-集成电路与电子学院杰青团队-招博士后
+1/4
-
广东省智能院与澳门大学、澳门科技大学、澳理工联合培养博士招生
+1/3
3楼2011-04-13 22:05:42
lchunmei001(金币+10): 2011-04-14 08:55:47
|
你这里都是在读取数据，没有输出啊…… C---> INPUT EXPERIMENTAL DATA WRITE(*,*)'elem ?' 上面这行是在屏幕上输出 elem 这样的字符 READ(*,'(A2)')elem 这里是读入一个长度为2的字符串，即你给 elem 的值 WRITE(FILM1,'(4A,2A,3A)')'ab-',elem,'.IN' 这里是给一个字符串 film1 赋值，它最终的值是是ab-??.IN，其中??是上一步获得的。但这里好象有点儿问题，应该是'(3A,2A,3A)'，也可能是后面 'ab-' 这儿有问题。 OPEN(1,FILE=FILM1,status='old') 这是打开一个名为 film1，即 ab-??.IN 的文件 READ(1,*) 读入一行，但其值不被使用 READ(1,*) 同上 READ(1,*)a,b,c,d,e,f,g,h 为 a, b, c, d, e, f, g, h 赋值，这些值来自于上面的那个打开的文件…… 其实，随便找一本 Fortran 的书，看 I/O 部分的讲解即可…… |
2楼2011-04-13 22:02:01
lchunmei001(金币+10): 2011-04-14 08:55:54
|
在下不才斗胆来说两句。 细观Lz的代码，惊奇的发现，这段代码写的真的挺值得学习的。 1 C---> INPUT EXPERIMENTAL DATA 2 WRITE(*,*)'elem ?' 3 READ(*,'(A2)')elem 4 WRITE(FILM1,'(4A,2A,3A)')'ab-',elem,'.IN' 5 OPEN(1,FILE=FILM1,status='old') 6 READ(1,*) 7 READ(1,*) 8 READ(1,*)a,b,c,d,e,f,g,h 简单的来看，楼主需要输入的如下形式的东西。假设楼主的输入文件名为，ab-AA.IN. 则，lz在该程序中仅需输入“AA”, 这样应该可以保证没有问题。 实际上正如snoopyzhao 兄所说，语句4其本质就是一个字符串运算，而且他也指出，这里可能对于"ab-"的格式描述符"4A" 有问题。建议作者，仔细调试这一段，最简单的，可以在4后加上输出，看看是否有问题。 同时可以在open这里加上是否成功打开文件的判断标志。 |
4楼2011-04-14 08:00:43
5楼2011-04-14 09:03:36
