2
1
0
新人
Program Main Implicit None Integer :: a,b,c,d,e,f Integer :: i Open(12,File="E:\20180103.txt") read(12,*) read(12,*) a,b,c write(*,*) a,b,c Close(12) End Program Main
4E169D5C-F7CD-4A43-98F9-902B33A5B85E.png (97.29 KB, 下载次数: 280)
下载附件
2020-1-27 16:57 上传
使用道具 举报
Vim
168
大师
Transpose 发表于 2020-1-27 18:31 文件的绝对路径正确吗?读写文件的时候,要么文件和代码在一个文件夹里,要么要指定绝对路径 ...
954
本版积分规则 发表回复 回帖后跳转到最后一页
颁发给完成“有规有矩”任务的网友
颁发给论坛注册3年以上的网友
颁发给注册后积极发言的新人
颁发给发帖量超过一定数量的坛友
颁发给论坛热心帮助他人的网友
捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )
GMT+8, 2024-12-27 15:44
Powered by Tencent X3.4
© 2013-2024 Tencent