Fortran Coder

查看: 15859|回复: 2
打印 上一主题 下一主题

[求助] 不懂数组函数如何使用

[复制链接]

25

帖子

8

主题

0

精华

熟手

F 币
143 元
贡献
81 点
跳转到指定楼层
楼主
发表于 2021-3-10 14:56:29 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
彭国伦的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

QQ截图20210310144942.png (18.42 KB, 下载次数: 334)

错误如图

错误如图
分享到:  微信微信
收藏收藏 点赞点赞 点踩点踩

954

帖子

0

主题

0

精华

大师

F 币
184 元
贡献
75 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
沙发
发表于 2021-3-10 16:41:38 | 只看该作者
  x=maxval(a)
  y=minval(a)
就行了。
注意:
a 是数组
a(students) 不是数组,是一个单变量,代表 a 数组的第 students 个元素。

25

帖子

8

主题

0

精华

熟手

F 币
143 元
贡献
81 点
板凳
 楼主| 发表于 2021-3-12 17:05:28 | 只看该作者
vvt 发表于 2021-3-10 16:41
x=maxval(a)
  y=minval(a)
就行了。

收到,谢谢
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-12-24 08:01

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表