作者perturb (背後有老板)
看板Fortran
标题Re: [问题] 从档案读备精度实数(如何控制格式)
时间Wed May 11 14:58:54 2011
integer::I
real(8), dimension(4)::sss
open(unit=100, file='/home/data', form="formatted")
read(100, *) sss
do I=1,4
write(*, '(D17.11)') sss(I)
enddo
※ 引述《maiming (苍)》之铭言:
: 我有个关於读档的问题想要请教大家。
: 现在有一个档案名称为data,内容有四行,如下:
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 162.105.195.208
1F:推 maiming:我尝试了上述的写法,但仍就是一样的结果,印到萤幕的值 05/11 15:12
2F:→ maiming:仍是零点多少开头,而非照档案的内容印出。 05/11 15:12
3F:→ awer89:write(*,*) ?? 05/11 16:00
4F:→ qaz692:你在write里用D,表示你用指数型态输出,当然是零点多少开头 05/11 16:26