搜索你感兴趣的问题
如何把几个数逆序排列?
不惑之道 2019-04-02
分享
推荐回答
情比纸薄 2022-01-19
PrivateSubrank(nAsInteger,a()AsLong)Fori=1Ton-1Forj=i1TonIfa(j)>a(i)Thent=a(i):a(i)=a(j):a(j)=tNextjNextiEndSubvoidrank1(inta[],intn){inti,j,t;for(i=0;ia[i]){t=a[i];a[i]=a[j];a[j]=t;}};};}优化后的程序:PrivateSubrank(nAsInteger,a()AsLong)Fori=1Ton-1tmax=iForj=i1TonIfa(j)>a(tmax)Thentmax=jNextjIftmaxa[tmax])tmax=j;if(tmax!=i){t=a[i];a[i]=a[tmax];a[tmax]=t;}};}
本网站引用、摘录或转载上述内容仅供网站访问者交流或参考,文中观点或信息与爱问公司无关,与之相关的任何事务以及法律责任均与爱问公司无关。
相关推荐
有问题 @爱问
Powered by iask.com