wuxiaolong 发表于 2015-12-30 20:08:51

fortran95上一模一样敲上去的报错

新手入门，fortran95上一模一样敲上去的报错，code如下：
    program ex0432
implicit none
type :: person
    character(len=30) :; name
    integer   ::age
    integer   ::height
    integer   ::weight
    character(len=80):: address
end type person
type(person) :: a
write(*,*) "NAME:"
read(*,*)a%name
write(*,*) "AGE:"
read(*,*)a%age
write(*,*)"height:"
read(*,*)   a%height
write(*,*)"weight:"
read(*,*)   a%weight
write(*,*)"address:"
read(*,"(a80)")    a%address
write(*,100) a%name,a%age,a%height,a%weight,a%address
100 format(/,"name:",a10/,"age:",i3/,"height:",i3/,"weight:",i3/,"address:",a50)
stop
end

楚香饭 发表于 2015-12-30 21:02:35

第四行
character(len=30) :; name
改为
character(len=30) :: name

即，第二个冒号打成了分号

wuxiaolong 发表于 2015-12-30 21:06:50

.-.-
3Q3Q~多谢了，我找了那么久竟然没发现。。。。呜呜呜
页: [1]
查看完整版本: fortran95上一模一样敲上去的报错