[交流] 【求助】大家帮忙看看数组存值和引用 已有2人参与

Originally posted by piduil at 2010-12-01 16:26:52:
! 假设你的test数组已经赋值，空的数据用0表示
H=0
do istep=1,10
  do j=1,10
    if(test(j,istep)/=0) H(test(j,istep))=1
   end do
end do

Originally posted by piduil at 2010-12-01 13:18:32:
1，test数组需要初始化，假设初始化所有的值都为0
2，H数组初始化全部为0，在循环中就可以不需要else后面的赋值
3，如果test的值为0的情况你没有考虑，这样会引起给H(0)赋值的错误，这样你判断一下然后跳出循环 ...

Originally posted by astringent at 2010-12-01 16:02:10:

我改了一下，你说的是这个意思吗？
do istep=1，10
test（10，istep）=a  ！将a存到数组test中。对应每个step的a值最多是10
enddo
H=0
do i=1，30000  ！x取所有可能的 值
    test=0  
    do istep=1， ...