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