fortran 用data语句输入一个二维数组
时间: 2023-12-21 10:05:57 浏览: 61
可以使用以下代码来使用data语句输入一个二维数组:
```
program input_array
implicit none
integer :: i, j
integer, dimension(3,3) :: my_array
data my_array /1,2,3,4,5,6,7,8,9/
do i = 1, 3
do j = 1, 3
write(*,*) my_array(i,j)
end do
end do
end program input_array
```
在上面的代码中,我们创建了一个名为`my_array`的3x3整数数组,并使用data语句输入了数组的值。然后,我们使用一个嵌套的do循环来遍历数组并将其打印到屏幕上。