advance="no",就是输出不换行。 write(*,"(f10.1)",advance="no")A 格式化输出的控制字符非常的丰富,但常用的并不多,一般说来:" I 、F、E、A、X "是最常使用的几个格式,最好把它们都记下来。 Iw[.m]以w个字符的宽度来输出整数,至少输出m个数字。 如:write(*,"(I5)") 100 输出:_ _100 ; ...
3.write(unit, *,advance='no') 不换行输出,缺省默认为advance=“yes”, 换行输出,advance='no'控制下一次的输出不换行 4.close(unit) 关闭一个文件并释放使用的unit号 文件查询、文件定位 inquire(file= ,exist=if_have) if_have返回逻辑变量 rewind( unit )对文件进行重复读取 backspace( unit )回退一个...
换行的问题 使用gfortran编译器, 用advance 来控制要不要换行。 默认是换行的,如果不想换行,设置 advance=’no’ 如 write(*,’(l4) ‘,advance=’no’) iscome 当使用 ifort编译器时 / 是换行的意思, \是不换行的意思, 如 下面这句就不换行 write(*,’(l4 ) ‘) iscome 在控制输出格式时, 使用 f...
打开文件 open(unit, file=trim(filename), status='replace', action='write', iostat=ierr) if (ierr /= 0) then print *, 'Error opening file ', trim(filename) stop end if ! 写入数据到文件 write(unit, '(A)', advance='no') 'Hello, World!' write(unit, '(A)', advance='no') ...
Write(*,'(I6"!="I4.1\)') N,BUFF(LEN) !\表示不换行 DO I=LEN-1,1,-1 WRITE(*,"(I4.4)",advance="no") BUFF(I) END DO PRINT * DEALLOCATE(BUFF) END PROGRAM PROG1 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12.
write(6,"(a,I<int(log10(n+0d0))+1>" ' n=',n 一般说来 变量可以放在...
整整一行数就全都读到数组里了。但是如果用write，写到文件中却不是这个样子，会给你一个超级长的文件然后每行只有一个数。有一个选项叫ADVANCE='YES'/'NO'，可以控制输入输出语句完了之后要不要换行，默认是'YES'，很不幸，在intel的fortran中这个选项只对read起作用，write依旧不行。在fortran的...
我要在同一行把数组输出来比如56789但是用了语句write(*,"(i4)",advance="no")a以后输出的是每行一个数字,只有在最后一行才没有和下一组数字换行怎么办呢?只在一行输出所有数字!!直接... 我要在同一行把数组输出来比如5 6 7 8 9但是用了语句write(*,"(i4)",advance="no") a以后输出的是每行一个...
是一种不标准的写法。表示不换行。如果不这样写，运行后是这样：Input N= 3 6 这样写了以后，运行后是这样：Input N=3 6 这不标准，标准的写法是：WRITE(*,'(A)', advance='no') 'Input N='READ *,N
RECL=2147483646 (231-2) 是顺序格式化输出、列表式输出和名称列表输出中的缺省记录长度。 可以按《FORTRAN 77 Language Reference》手册中所述识别和实现 ENCODE 和DECODE。 非前进式 I/O 是使用 ADVANCE='NO' 启用的,如下所示: write(*,’(a)’,ADVANCE=’NO’) ’n= ’ read(*,*) n Previous...