| 彭国伦的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
 |