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

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

新手入门，fortran95上一模一样敲上去的报错，code如下：

[Fortran] 纯文本查看 复制代码

    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~ 多谢了，我找了那么久竟然没发现。。。。呜呜呜

[求助] fortran95上一模一样敲上去的报错

规矩勋章

新人勋章

爱心勋章

水王勋章

元老勋章

热心勋章