fortran如何应用数组？从键盘输入10个数，并按输入时的逆序输出。

如何应用数组？从键盘输入10个数，并按输入时的逆序输出。fortran

既然是fortran，为啥标签里加上 python java php

program reverse_numbers
implicit none
integer :: i, j, n
real :: numbers(10)

! 从键盘读取数据
do i = 1, 10
   write(*,*) "输入第", i, "个数："
   read(*,*) numbers(i)
end do

! 输出数据
write(*,*) "输入的数："
do j = 10, 1, -1
   write(*,*) numbers(j)
end do

end program reverse_numbers

该回答引用chatgpt:

program array_example
  implicit none
  integer :: i
  integer, dimension(10) :: arr

  ! 从键盘输入 10 个数
  do i = 1, 10
     write(*,*) "请输入第", i, "个数："
     read(*,*) arr(i)
  end do

  ! 按输入时的逆序输出
  write(*,*) "逆序输出："
  do i = 10, 1, -1
     write(*,*) arr(i)
  end do

end program array_example

在这个程序中，使用 integer, dimension(10) :: arr 定义了一个长度为 10 的整数数组 arr，使用 do 循环从键盘输入 10 个数，然后使用另一个 do 循环按输入时的逆序输出这些数。

当然，这只是一个简单的示例，实际应用中可能需要更复杂的操作和算法来处理数组。

  • 这有个类似的问题, 你可以参考下: https://ask.csdn.net/questions/7763037
  • 除此之外, 这篇博客: Fortran 程序设计 实习01中的 输入样例 部分也许能够解决你的问题, 你可以仔细阅读以下内容或跳转源博客中阅读:
  • 武汉深圳温州北京哈尔滨
    日均温（℃）14.521.512.05.5-7.0
    相对湿度（%）47.045.042.029.058.0
    日平均风速（m/s）2.452.450.92.454.4