fortran如何写这样的do循环,有80000个数据,改变1~50,再变401~450的数值,如此直到79901到79950?

来源：学生作业学帮网编辑：学帮网时间：2024/05/31 17:47:07

1-50
401-450
79901-79950
请原谅我看不出来这组数据的规律.
或许下面的结果可能是你想要的.
real data( 80000 )
integer i
i = 1
Do while( i