fortran简易编程求助-二维数组最小值位置

您所在位置：社区首页 — Fortran讨论区 — fortran简易编程求助-二维数组最小值位置

回帖发新帖刷新版面

主题：fortran简易编程求助-二维数组最小值位置

wch238 [专家分：0] 发布于 2012-03-09 23:30:00

想求数组d(100,100)中的最小值d(i,j)的位置(即确定i,j),不知道编程，求助帮忙，谢谢！！！

最后更新于：2012-03-09 23:32:00

本帖地址： http://bbs.pfan.cn/post/382236.html

回复列表（共4个回复）

沙发

weixing1531 [专家分：2580] 发布于 2012-03-10 00:03:00

minloc函数

板凳

wch238 [专家分：0] 发布于 2012-03-10 00:46:00

就是具体不会编程，fortran刚开始学

3 楼

chengsukun [专家分：30] 发布于 2012-03-10 23:11:00

初学的话可以看看fortran简单程序集
real d(100,100),dmax
integer imax,jmax
dmax = d(1,1)
imax = 1
jmax = 1
do j = 1,100
do i = 1,100
  if(dmax<d(i,j))then
    imax = i
    jmax = j
    dmax = d(i,j)
  endif
enddo
enddo

4 楼

fpchi9103 [专家分：260] 发布于 2012-03-16 11:21:00

real,dimension(10,10)::a
do i=1,10
  do j=1,10
    a(i,j)=i+j
  enddo
enddo
print*,minloc(a)
stop
end

我来回复

您尚未登录，请登录后再回复。点此登录或注册

主题：fortran简易编程求助-二维数组最小值位置

回复列表（共4个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

主题：fortran简易编程求助-二维数组最小值位置

回复列表 （共4个回复）

我来回复

程序员工具箱 new

代码片段

本版新帖

回复列表（共4个回复）