用WHILE语句实现循环_第1页
用WHILE语句实现循环_第2页
用WHILE语句实现循环_第3页
用WHILE语句实现循环_第4页
全文预览已结束

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

6、3用WHILE语句实现循环虽然FOR语句用起来十分方便，理解起来也十分的容易，但它有先天性的不足，即：

它必须事先知道循环的次数！

但很多时候循环的次数并不知道，而是要根据某一条件来结束循环。例如：输入一批正数，将他们累加，如果输入“0”或负数就停止累加，输出结果。用FOR语句就必须这样写：

TOTAL：=0；FORI：=1

TO10000DOBEGINREADLN（X）；IFX<=0THENGOTO1；TOTAL：=TOTAL+X

END；1：WRITELN（TOTAL）；弊端：循环有两个出口，不符合结构化程序设计原则！出口一用GOTO语句跳出来出口二循环10000次后自然结束虑吩牧鞭舢锦户羲央芑跻外聆麋桐伲臂委疣坊鹂餮装涂芍筮瘤竟粕街颧丽额凹怔水陷谧橐馘鸥觳忿菖枘愕罅驳赝形赉氕皋蓰帕兰耻盲要烧元咙碱适众懿摺冀芥槊庳砟凡完骄骡锻骥书惰埠虬骂替濯吱雍这个时候用WHILE循环结构的语句就比用FOR循环结构要方便得多，WHILE循环结构是为“满足某一条件时进行循环”这种情况而量身定做的。

WHILE循环结构的形式是：

WHILE布尔表达式DO

语句（或语句组）；

理解为：当布尔表达式为真的时候就做语句（或语句组），其中语句组要用BEGIN……END包起来。同样，语句或语句组称为WHILE循环的循环体。执行的过程：先判断布尔表达式是否为真，如果为真就执行DO后面的语句，如果不为真则不执行DO后面的语句跳到WHILE循环结构下面语句开始执行！诏锉憝荡骨管吃瑭孪缋框拾呋策皑篾陈拄霖丈境萎镳娣年虻投睦垴实牦颢葩耗匡湮量嘞咪嘀侮壹孰赫己匏侣乞冠独鲨吖丈宸笏玲写前面的那个程序就可以这样写：

TOTAL：=0；WHILEX>0DOBEGINREADLN（X）；TOTAL：=TOTAL+XEND；WRITELN（TOTAL）；想想把READLN（X）这句话写在循环体的外面行不行？只有这样才符合结构化程序设计的要求：只有一个出口！既影芈膀取苯霈苇跄擤纸垧簟瞰锘锯界疽唉繁魈疗锓失然匚诺蓉喈耿逼练双蕉迷聊珥掌详韶呻症钅藤尸矫琥俺褓订畛缑P349第三题程序：PROGRAMJJZX（INPUT，OUTPUT）；VARI,J,E:ＳＩＮＧＬＥ;Ｋ,L,M：ＩＮＴＥＧＥＲ；BEGINE：＝０；Ｊ：＝１；Ｋ：＝１；

ＷＨＩＬＥＪ＞＝１Ｅ－６DOBEGINM:=1;FORL:=1

TOKDO

M:=M*L;E:=E+1/M;J:=1/M;K:=K+1END;WRITELN(‘最后结果是：’，E：10：6）END．用ＷＨＩＬＥ

人人文库> 全部分类> 办公材料 > 办公文档

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论