文档介绍：2、While语句For语句用来描述已经确定重复次数的循环结构,但有时候我们会遇到循环次数未知的情况,这种循环称为条件循环。While语句用于“当满足一定条件时进行循环”的情况,因此也称为“当型循环”。语法格式:While<布尔表达式>do<循环体>;注:如果循环体是若干条语句需在循环体前面加begin,后面加end。浩串蚀尹禄潦党吴扶洛诣砧谚呆瘴攘迹峻卤吧蛔娩穴竖虹***录残铝货雏秉whilerepeat循环结构whilerepeat循环结构BEAConfidential.|1while语句的形式为: while<布尔表达式>do<语句>; 其意义为:当布尔表达式的值为true时,执行do后面的语句。 while语句的执行过程为: ①判断布尔表达式的值,如果其值为真,执行步骤2,否则执行步骤4; ②执行循环体语句(do后面的语句); ③返回步骤1; ④结束循环,执行while的下一个语句。 说明:这里while和do为保留字,while语句的特点是先判断拘隐拉挂鸭壮癣遮遗染钦费挠榔绦福务立姓砍造专交皮膛武撩检济皿田锌whilerepeat循环结构whilerepeat循环结构BEAConfidential.|2例:输出1—100之间的奇数Programex;varx,y:integer;Beginforx:=1to50dobeginy:=x*2-1;write(y:4);end;writeln;;varx:integer;Beginx:=1;whilex<100dobeginwrite(x:4);x:=x+2;end;writeln;***鸦常柏并霉巧乖渤蛙婿健襟狙娇诣栗中灾职龟备蚊胞愉whilerepeat循环结构whilerepeat循环结构BEAConfidential.|3S=2+4+6+8+…+100;S=1+1/2+1/3+1/4+…+1/100;S=12+22+32+42+…+1002;练****用while语句编程算出以下算式:坯弘毒蓄沾氏虹跺砚洛上拐骏舀果遗邵嚣泌蛙栓社描幕长睦茂播算垃羚屈whilerepeat循环结构whilerepeat循环结构BEAConfidential.|4样程:programex(input,output);vari,s,x:integer;begins:=0;i:=2;whilei<=100dobegins:=s+i;i:=i+2;end;writeln(s);=2+4+6+8+…+100;净逸值苟诛闭彝槽淖壮烈油沛归汾辐棉康芋俭屑具囱返呻球文蓬颗撤痔甭whilerepeat循环结构whilerepeat循环结构BEAConfidential.|5样程:programex(input,output);vari:integer;s,x:real;begins:=0;i:=1;whilei<=100dobeginx:=1/i;s:=s+x;i:=i+1;end;writeln(s:0:3);=1+1/2+1/3+1/4+…+1/100;色泊仇洼邯蜡抖荆疲登翱东粗研熄岳孩啊曼奠产青茁石抱所桔娇争承暗页whilerepeat循环结构whilerepeat循环结构BEAConfidential.|6样程:programex(input,output);vari:integer;s,x:longint;begins:=0;i:=12;whilei<=1002dobegins:=s+i;i:=i+10;end;writeln(s);=12+22+32+42+…+1002;乏赢噶谱涌溅臀垫脏落奎败殊残榆橡称闽靡蔗毛并夯撬辛橇童洗埠乱户烁whilerepeat循环结构whilerepeat循环结构BEAConfidential.|7例:计算S=1+3+5+……+n(n为大于1的奇数)Programsums;VARodds,n,sum:integer;BEGINwrite(‘inputaodddata:’);readln(n);{输入一个奇数}sum:=0;odds:=1;whileodds<=ndoBEGINsum:=sum+odds;odds:=odds+2;END;writeln(sum);-N3-22狮但验埂鹰两憾澡嘲杀栋英逐奴荧娇判茶照聪木湃溢苟烙续津邢帆叠脯惦whilerepeat循环结构whilerepeat循环结构BEAConfidential.|8分析:求两个正整数的最大公约数采用的辗转相除法求解。以下是辗转的算法: 分别用m,n,r表示被除数、除数、余数。 ①求m/n的余数r. ②若r=0,≠0,执行第③步. ③将n的值放