- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
新安江中学廖丽琴 for i=1 to n-1 ’变量i控制遍数n-1 for j=n to i+1 step -1 ’控制每次比较次数n-i if d(j)d(j-1) then ’不满足降序(后项前项)则交换 temp=d(j) d(j)=d(j-1) d(j-1)=temp end if next j next i for i=1 to n-1 ’控制排序遍数n-1 k=i ’第I趟排序假设i位置上的数最大 for j=i+1 to n ’比较剩下的数,次数为n-i次 if d(k)d(j) then k=j ’记录比较之后较大数的位置 next j if ki then ’如果最值位置有变化的话则交换 d(i)=d(i)+d(k) d(k)=d(i)-d(k) d(i)=d(i)-d(k) end if next i 找数组a(1)——a(10)中最小值并显示在label1上 m=a(1) For i=2 to 10 if a(i)m then m=a(i) Next i Label1.caption=str(m) 特点:利用枚举算法,找出了最值,但具体 是数组中哪个位置a(?)的数是 最值没记录! 利用冒泡排序思想,可以找到a(1)到a(10)中最大的值并存储在a(1)中 For i=9 to 1 step -1 if a(i)a(i+1) then t=a(i):a(i)=a(i+1):a(i+1)=t Next i 利用冒泡排序思想,可以找到a(2)到a(10)中最大的值并存储在a(2)中 For i=9 to 2 step -1 if a(i)a(i+1) then t=a(i):a(i)=a(i+1):a(i+1)=t Next i 利用冒泡排序思想,可以找到a(3)到a(10)中最大的值并存储在a(3)中 For i=9 to 3 step -1 if a(i)a(i+1) then t=a(i):a(i)=a(i+1):a(i+1)=t Next i 总结:将a(1)到a(10)的数字排好序,需要上述代码重复9遍,只需修改红字即可(第x遍红字就是x)。为了提高程序效率,引进外循环,于是代码如下: for i=1 to n-1 ’变量i控制遍数n-1 for j=n-1 to i step -1 ’控制每次比较次数n-i if d(j)d(j+1) then ’不满足降序(后项前项)则交换 temp=d(j) d(j)=d(j+1) d(j+1)=temp end if next j next i for i=1 to n-1 ’变量i控制遍数n-1 for j=n to i+1 step -1 ’控制每次比较次数n-i if d(j)d(j-1) then ’不满足降序(后项前项)则交换 temp=d(j) d(j)=d(j-1
您可能关注的文档
最近下载
- 渠道护砌工程施工方案砼预制块护坡施工渠道砼工程砼格埂.docx VIP
- 气调库工程项目可行性研究报告.docx
- 2025年二级矿井维修电工(技师)技能认定理论考试题库资料(含答案).pdf
- 功能性食品学 课件 第8章 益生菌及其活性代谢物.pptx
- 实验室质量管理体系文件.docx VIP
- 电工高级技师实操考试试卷.pdf VIP
- 初中阶段初阶词汇初级-如何记单词.docx VIP
- 中文版安德森吞咽困难量表的信效度和临床应用评价.pdf VIP
- (正式版)D-L∕T 611-2016 300MW~600M级机组煤粉锅炉运行导则.docx VIP
- BSL实验室生物安全管理体系文件.docx VIP
文档评论(0)