在Fortran中，循环控制主要通过do循环来实现。以下是一个简单的例子，展示了如何在CentOS下的Fortran程序中使用do循环：

program loop_example
  implicit none
  integer :: i

  ! 使用do循环从1到10
  do i = 1, 10
    print *, 'i =', i
  end do

  ! 使用嵌套do循环
  do i = 1, 5
    do j = 1, 5
      print *, 'i =', i, 'j =', j
    end do
  end do

end program loop_example

在这个例子中，我们首先定义了一个整数变量i，然后使用do循环从1到10，每次循环都会打印出i的值。接下来，我们使用嵌套的do循环，外层循环变量i从1到5，内层循环变量j也从1到5。每次内层循环都会打印出i和j的值。

要将这个程序保存为一个文件（例如loop_example.f90），然后在CentOS下使用Fortran编译器（如gfortran）进行编译和运行：

gfortran -o loop_example loop_example.f90
./loop_example

这将输出以下内容：

 i =           1
 i =           2
 ...
 i =          10
 i =           1 j =           1
 i =           1 j =           2
 ...
 i =           5 j =           5

这就是在CentOS下使用Fortran进行循环控制的基本方法。你可以根据自己的需求修改循环条件和循环体。