彭国伦的fortran95中,数组函数MAXVAL(array[,dim][,mask]),返回数组中最大元素值,如何正确使用[Fortran] syntaxhighlighter_viewsource syntaxhighlighter_copycode program ex
implicit none
integer,parameter :: students=5
integer :: x,y,a(students)=(/5,7,1,0,-4/)
x=maxval(a(students))
y=minval(a(students))
write(*,*) x,y
stop
end
|