fortran 数组逆序

在Fortran中，可以使用循环和临时变量来实现数组的逆序。下面是一个示例代码：

program reverse_array
  implicit none
  integer :: arr(5) = [1, 2, 3, 4, 5]
  integer :: temp
  integer :: i

  ! 打印原始数组
  print *, "原始数组："
  do i = 1, size(arr)
    print *, arr(i)
  end do

  ! 数组逆序
  do i = 1, size(arr)/2
    temp = arr(i)
    arr(i) = arr(size(arr) - i + 1)
    arr(arr) - i + 1) = temp
  end do

  ! 打印逆序后的数组
  print *, "逆序后的数组："
  do i = 1, size(arr)
    print *, arr(i)
  end do

end program reverse_array

这段代码首先定义了一个长度为5的整型数组arr，并初始化为[1, 2, 3, 4, 5]。然后使用循环和临时变量temp来实现数组的逆序。最后，打印出逆序后的数组。

相关问题

fortran 数组初始化

Fortran中的数组初始化可以通过多种方式实现。以下是一些常见的方法：

1. 使用DATA语句：可以在声明数组时使用DATA语句来初始化数组元素。例如：

   INTEGER :: arr(3)
   DATA arr /1, 2, 3/

2. 使用赋值语句：可以在声明数组后使用赋值语句为数组元素赋初值。例如：

   INTEGER :: arr(3)
   arr = [1, 2, 3]

3. 使用循环语句：可以使用循环语句为数组元素逐个赋值。例如：

   INTEGER :: arr(3)
   DO i = 1, 3
       arr(i) = i
   END DO

4. 使用初始化函数：Fortran提供了一些内置的初始化函数，如RESHAPE、SPREAD等，可以用于数组初始化。例如：

   INTEGER :: arr(3)
   arr = RESHAPE([(i, i=1, 3)], [3])

这些方法可以根据具体的需求选择使用。需要注意的是，Fortran中的数组索引是从1开始的。

Fortran数组运算

Fortran中的数组运算可以使用多种方式实现，以下是几种常见的方法：

1. 循环遍历数组进行运算：使用do循环遍历数组中的每个元素，进行相应的运算。

例如，计算两个数组的和可以使用以下代码：

do i=1,n
  c(i) = a(i) + b(i)
enddo

2. 使用内置函数进行数组运算：Fortran中提供了许多内置函数，可以直接对数组进行运算。

例如，计算两个数组的点积可以使用以下代码：

dot_product = dot_product(a, b)

3. 使用向量化运算进行数组运算：Fortran支持向量化运算，可以对整个数组进行运算，提高运算效率。

例如，计算两个数组的和可以使用以下代码：

c = a + b

以上是Fortran中常见的数组运算方法，根据具体情况选择合适的方式进行实现。