编辑代码

program main
    !整型
    integer(kind=4)a  !fortran90 kind=4是指占用四个字节
    integer(kind=2)a
    ! 浮点型
    ! 单精度
    real(kind=4)a
    real*4 b
    real(4) c
    ! 双精度
    real(kind=8)a
    real*8 b
    real(8) c
    ! 3复数
    ! 声明和上述相同
    ! 字符与字符串
    character(20)::string
    string="Good moring."
    write(*,*) string
    string(6:)="evening."  ! 重新设置从第6个字符之后的字符串
    write(*,*) string
    string(1:2)="GO"
    write(*,*) string
    stop 
	
end