Question

fortran编程中，有关可变大小数组的问题。

小弟按照彭国伦版的《fortran 95 程序设计》第147页，原样编写了一段程序，程序如下：
program ex0716
implicit none
integer::students
integer,allocatable::a(:)
integer::i

write(*,*)"how many students:"
read(*,*)students
allocatable (a(students))

do i=1,students
write(*,"('number',i3)")i
read(*,*)a(i)
end do

stop
end
结果运行后出现这样的结果：
Error: Syntax error, found '(' when expecting one of: :: <IDENTIFIER>
allocatable(a(size),stat=error)
求各位大虾给小弟解释一下，为什么会出现这样的错误，谢谢！

• 你的回答被采纳后将获得：
• 系统奖励15（财富值+成长值）+难题奖励30（财富值+成长值）

Answer 1

write(*,*)"how many students:"
read(*,*)students
allocatable (a(students))
在这一句中的allocatable (a(students))改成 allocate(a(students))