论坛 › Fortran语法讨论 › 有1000个数想分成100组如何实现？

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

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

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

vvt 发表于 2017-7-10 09:40:26

这是逻辑问题，并非编程问题。

Do i = 1 , 100
Do j = 1 , 10
   处理 a( (i-1) * 100 + j )
End Do
End Do

这样就能满足你的要求了。

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

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

Do i = 1 , 100
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列的数组。还望指教一二，多谢多谢。

vvt 发表于 2017-7-10 11:32:36

基本的数组用法，循环和判断逻辑，还是应该自己去学习。这是基本功。

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

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

多谢多谢

查看完整版本: 有1000个数想分成100组如何实现？