Fortran数组、函数--查找内容

integer,parameter::num=5
integer::student(num)
或者 integer a(10)
或者 integer a(10,6)
student(1)=5    !第一个元素值为5，默认索引值从1开始
赋初值
integer A(5)
data /1,2,3,4,5/
data /5*0/     !5个0
data(A(i),i=2,4,1)  /2,2,3/        !隐do循环