pascal 教程 第八课 当型循环和直到型循环.pptVIP

Pascal程序设计(小学版)循环结构程序设计当型循环和直到型循环 * * 当型循环(while) while 布尔表达式 do begin 语句1; 语句2； … end; 格式： 循环体 当布尔表达式为真执行循环体，为假则退出循环体。 例： while a4 do begin a:=a+1; end; 当型循环(while) 例1：求s=2+6+10+14+18+……+94+98的值 program li1; var s,x:integer; begin x:=2;s:=0; while x=98 do begin s:=s+x; x:=x+4; end; writeln(‘s=‘，s); readln; end. 练习一：看程序，写结果 program lianxi1; var a,b,c:integer; begin a:=8; b:=3; c:=2; while a-b2 do begin a:=a-b; end; write(‘a=‘,a); readln; end