作者snowanimal (依然动物先生)
看板Programming
标题Re: [请教]如果要用fortran同时开10000个txt档......
时间Wed Feb 14 23:09:15 2007
※ 引述《[email protected] (㊣台湾宇宙造船公司 XD)》之铭言：
: ※ 引述《[email protected] (依然动物先生)》之铭言：
: > 原来问问题的是要从0000开始到9999
: > 所以在档名上可以简化些
: 你的写法
: 1)档名里面会有空格
: 2)前面不会补０
: > Program 10Kfile
: program名称不能用数字开头。
: > 我想~应该就可以了吧
: 错误的资讯还不如没资讯。
:
Program 10Kfile
integer I,S
chatacter*8 name
Name='0000.txt'
do I=1,10000
S=I-1
write (name,(1:4),'(i0.4)') S
write (*,*) name
enddo
stop
end
拍谢 是我笔误 XD
格式那边要更改一下为 i0.4 (应该没记错)
这样不足的位数将会补零
嗯 我手边没有编译器
所以也无法确定是不是不能够用数字
不过格式那边我的确是写错了
谢谢指教~ <(_ _)>
--
●▲◆▼●▲◆▼●▲◆▼●▲◆▼●▲◆▼●▲◆▼● ▲▲▲▲
▼ 我与我的酷企鹅 - 台客 ▲ 〒 〒
◆ 相本:
http://photo.xuite.net/animalion ◆ ▲
▲ 网志:
http://blog.xuite.net/animalion ▼ ◣
▼ ◢
●▼◆▲●▼◆▲●▼◆▲●▼◆▲●▼◆▲●▼◆▲● M A R U.
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 192.83.177.84