24小时热门版块排行榜    

CyRhmU.jpeg
查看: 1350  |  回复: 13

--power

金虫 (小有名气)

引用回帖:
10楼: Originally posted by --power at 2016-07-11 18:37:37
real*8 a(9)       open(unit = 1, file = 'data.dat')

发错了,应该是:
real*8 a(9)
open(unit = 1,file = 'data.dat', iostate = io)
do while (io ==0)
    read(1,*) a      
end do
用手机发的,不怎么方便,见谅

发自小木虫Android客户端

» 本帖已获得的红花(最新10朵)

11楼2016-07-11 18:50:48
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

园中园

新虫 (正式写手)

送红花一朵
引用回帖:
11楼: Originally posted by --power at 2016-07-11 18:50:48
发错了,应该是:
real*8 a(9)
open(unit = 1,file = 'data.dat', iostate = io)
do while (io ==0)
    read(1,*) a      
end do
用手机发的,不怎么方便,见谅
...

谢谢您了
追求,奋斗,再追求,再奋斗
12楼2016-07-11 19:01:31
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

sunkingxu

木虫 (小有名气)

【答案】应助回帖

用txt进行文本替换,将星号换成0加上一个空格,再读起来就容易了
13楼2016-07-12 08:18:29
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

园中园

新虫 (正式写手)

追求,奋斗,再追求,再奋斗
14楼2016-07-12 09:13:51
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 园中园 的主题更新
信息提示
请填处理意见