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

Question

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

Answer 1

既然是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