- Fortran 教程
- Fortran - 主页
- Fortran - 概述
- Fortran - 环境设置
- Fortran - 基本语法
- Fortran - 数据类型
- Fortran - 变量
- Fortran - 常量
- Fortran - 运算符
- Fortran - 决策
- Fortran - 循环
- Fortran - 数字
- Fortran - 字符
- Fortran - 字符串
- Fortran - 数组
- Fortran - 动态数组
- Fortran - 派生数据类型
- Fortran - 指针
- Fortran - 基本输入输出
- Fortran - 文件输入输出
- Fortran - 过程
- Fortran - 模块
- Fortran - 内在函数
- Fortran - 数值精度
- Fortran - 程序库
- Fortran - 编程风格
- Fortran - 调试程序
- Fortran 资源
- Fortran - 快速指南
- Fortran - 有用的资源
- Fortran - 讨论
Fortran - 嵌套循环
您可以在任何另一循环构造中使用一个或多个循环构造。您还可以在循环上放置标签。
句法
iloop: do i = 1, 3 print*, "i: ", i jloop: do j = 1, 3 print*, "j: ", j kloop: do k = 1, 3 print*, "k: ", k end do kloop end do jloop end do iloop
例子
program nestedLoop implicit none integer:: i, j, k iloop: do i = 1, 3 jloop: do j = 1, 3 kloop: do k = 1, 3 print*, "(i, j, k): ", i, j, k end do kloop end do jloop end do iloop end program nestedLoop
当上面的代码被编译并执行时,它会产生以下结果 -
(i, j, k): 1 1 1 (i, j, k): 1 1 2 (i, j, k): 1 1 3 (i, j, k): 1 2 1 (i, j, k): 1 2 2 (i, j, k): 1 2 3 (i, j, k): 1 3 1 (i, j, k): 1 3 2 (i, j, k): 1 3 3 (i, j, k): 2 1 1 (i, j, k): 2 1 2 (i, j, k): 2 1 3 (i, j, k): 2 2 1 (i, j, k): 2 2 2 (i, j, k): 2 2 3 (i, j, k): 2 3 1 (i, j, k): 2 3 2 (i, j, k): 2 3 3 (i, j, k): 3 1 1 (i, j, k): 3 1 2 (i, j, k): 3 1 3 (i, j, k): 3 2 1 (i, j, k): 3 2 2 (i, j, k): 3 2 3 (i, j, k): 3 3 1 (i, j, k): 3 3 2 (i, j, k): 3 3 3
fortran_loops.htm