有1000个数想分成100组如何实现？

alohomora100 · 发表于 2017-7-9 20:16:39

目下有一万个数，想10个一组分为100组如何实现呢？多谢各位！

alohomora100 · 发表于 2017-7-10 10:30:49

vvt 发表于 2017-7-10 09:40
这是逻辑问题，并非编程问题。

Do i = 1 , 100

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

do i=1,n            
            wq(1)=wa(i)*coord(i,1)/wt
                write(12,*)wq(1)
          enddo
          do i=1,1000
            do j=1,10
                  m(i)=(i-1)*10+j
                  qcm(1)=wq(m,1)
                  write(13,*)qcm(10)
        enddo

file12中最后是一个10000行1列的数组，我想把12中第一列前10个数相加给第一个qcm（1）,11-20相加给第二个qcm（1），最后file13中得到1000行1列的数组。还望指教一二，多谢多谢。

alohomora100 · 发表于 2017-7-10 14:11:41

vvt 发表于 2017-7-10 11:32
基本的数组用法，循环和判断逻辑，还是应该自己去学习。这是基本功。

多谢多谢

[数值问题] 有1000个数想分成100组如何实现？