我使用 Fortran,我想知道是否可以制作类似的东西
do i = array
write (*,*) i
end do
其中 array 是一个不一定有序的整数列表。
最佳答案
我将引入第二个索引来迭代数组的元素:
program test
implicit none
integer, dimension(6) :: A
integer, dimension(10) :: B
integer :: i, j
A = (/ 1, 3, 4, 5, 8, 9 /)
B = (/ 2, 4, 6, 8, 10, 12, 14, 16, 18, 20 /)
do j = 1, size(A)
i = A(j)
write(*,*) i, B(i)
end do
end program test
关于loops - 从列表中循环 Fortran,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/9791001/