Question

FORTRAN编程求大神解答

题目是：编写求N个数中绝对值最大数和最小数的函数子程序，并编写主程序分别求以下矩阵主对角线和次对角线中绝对值最大和最小元素并输出，同时输出两对角线元素。
急啊~

Answer 1

求绝对值的内部函数是abs，求数组最大值的内部函数做轮是maxval，最小值minval，他们都支持数组运算，所以程序编起来相当简单。比如一个数组为A(N)，属实数域，其程序可写为
integer,parameter :: N = 10
real A(N)
real A_abs_max, A_abs_min
! set value for A
A = (/ 1.0, 2.0, -1.5, 2.1, -1.3, 2.7, 3.3, 1.5, -3.3, 1.8 /)
A_abs_max = maxval( abs(A) )
A_abs_min = minval( abs(A) )
! output the results
print *, '绝对值最大数是：', A_abs_max
print *, '绝对值最小数是：', A_abs_min
end

对于矩阵，直接取出要求的数据到A里纯配信在用上面的程序卖正即可，非常简单！

Answer 2

"并编册拿数写敏搜主程序分别求以下矩阵主对角线和次对州首角线中绝对值最大和最小元素并输出，同时输出两对角线元素"
“以下矩阵”是啥？还是阶数为变量N?

Answer 3

MINVAL MAXVAL ABS一起用就行了

Answer 4