第04章 输入输出和声明.pptVIP

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * Lw 以w个字符长来输出T或F的真假值 write(*,”(L4)”) .true. 使用4个字符长度输出逻辑变量 T 输出3个空格和1个T Gw.d 以w个字符长来输出所有类型的数据，d不一定会使用，但不能省略个字符 用来输入/出字符/整数/逻辑数时，Gw.d=Aw/Iw/Lw，d必须随便给一个数字，不能省略 用来输入/出实数时，Gw.d=Fw.d或Ew.d n0.1-0.5*10-d-1或n=10d-0.5时，等于Ew.d 其他情况等于(Fa.b,4X)，其中a=w-4，b=剩余位数 write(*,”(G9.4)”) 123.0 ! G9.4=F5.1, 4X write(*,”(G9.2)”) 123.0 ! G9.2=E9.2 / 换行输出 write(*,”(I3//I3)”) 10, 10 ! / 代表换行 write(*,”(I3, /, /, I3)”) 10, 10 ! 可以中间加逗号 输出结果： 结果得到3行输出，每一个“/”会换一行然后在该行继续输出 1 0 1 0 Tc 把输出的位置移动到本行的第c个字符 write(*,”(T3,I3)”) 100 ! 把输出位置移动到第3个字符 write(*,”(10X,T3,I3)”) 100 ! 输出位置向右移动10个字符后，移动到第3个字符 输出结果： 两行程序得到同样的输出结果，输出位置都移动到第3个位置 1 0 0 可以重复地以同样的格式输出数据 write(*,(3(1X,F5.2))) 1.0, 2.0, 3.0 ! 连续以3个1X,F5.2的格式来输出3个实数 write(*,(3I3)) 1, 2, 3 ! 连续以3个I3的格式来输出3个整数 1 . 0 0 2 . 0 0 3 . 0 0 1 2 3 可以放进要输出的字符串 write(*,(3+4=,I1)) 3+4 ! 用单引号封装字符 write(*,( 3+4= ,I1)) 3+4 ! 用两个单引号封装字符 write(*,(3+4=,I1)) 3+4 ! 用双引号封装字符 write(*,(3+4=,I1)) 3+4 ! error write(*,(3+4=,I1)) 3+4 ! error 可以把输出格式放在字符串变量中 program ex0425 character(len=10) fmtstring fmtstring = (I2) write(*,fmtstring) 3 end 好处是可以动态地改变输出格式 fmtstring(3:3)=5 使用输出格式时，注意“类型”是否正确，有时逗号可以省略 write(*,”(1XI5)”) 5 ! 空格格式后的逗号可以省略 write(*,”(I5,f5.1)”) a, b ! 逗号不能省略 PRINT的用法和WRITE类似，只是不能指定输出位置 print *, a print 100,a ! 使用行代码100的format输出 print “(A10)”, “Hello” ! 把格式字符串写在print中 输出格式可以在输入命令READ中使用 4.5 声明的其他事项 4.5.1 变量名称的取名策略 变量的名字可以使用字符集英文26个字母，0～9这10个数字以及下划线“_”，首字母必须是英文字母 变量的名字最好是取一个有意义的英文单词，这样可以减少程序编写时出错的机会 4.5.2 IMPLICIT命令 变量并不一定要经过程序的声明才能使用，编译器会根据变量名称的第一个字母来自动决定这个变量的类型。 第1个字母为I、J、K、L、M、N的变量会被视为整数类型 其他字母打头会被认为是实数 [ex0427.f90] 变量不经声明使用，容易发生“人为错误” program ex0428 i=123+321 write(*,(123+321=,I4)) j end IMPLICIT NONE 关闭“默认类型”功能，所有变量必须进行声明，否则会出错 IMPLICIT命令必须放在PROGRAM命令的下一行 [ex0428.f90] IMPLICIT命令也可用来设置“默认类型”，是指Fortran不经过声明，由第一个字母来决定变量类型 implicit integer(A,B,C) ! A、B、C开头的变量都视为整型数 implicit integer(A-F,I,K) ! A到F及I、K开头的变量都视为整型数 implicit real(M-P) ! M到P开头的变量都视为实型数