不懂数组函数如何使用

15235312522

彭国伦的fortran95中，数组函数MAXVAL(array[,dim][,mask]),返回数组中最大元素值，如何正确使用

[Fortran] 纯文本查看 复制代码

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

15235312522

vvt 发表于 2021-3-10 16:41
x=maxval(a)
  y=minval(a)
就行了。

收到，谢谢