作业帮 > 综合 > 作业

FORTRAN语言:用冒泡法排序将N个数(即动态一维数组)从大到小排列……

来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/11 05:26:00
FORTRAN语言:用冒泡法排序将N个数(即动态一维数组)从大到小排列……
基本思路是:对N个数,从第一个到第N个,主次比较相邻两个,大放前,这样得到的最小的数就放在了最后,然后从第一个到第N-1个再逐次比较……第二小的放在倒数第二. 急求解答~~明儿就考试了~~
FORTRAN语言:用冒泡法排序将N个数(即动态一维数组)从大到小排列……
eal*8 :: a(n)
real*8 :: temp
integer :: i,j
do i=1,n-1
do j=i+1,n
if (a(i) .lt. a(j)) then
temp = a(i)
a(i) = a(j)
a(j) = temp
endif
enddo
enddo