diy-pascal辅导程序基础循环结构repeat.pptxVIP

repeat循环 ;var s,i:integer; begin s:=0; i:=1; repeat （ ）; i:=i+1; until（ ）; writeln(s=,s); end.;Program ex12; var x,a,s: integer; begin s:=0; repeat a := x mod 10; x := x div 10; s := s+a; until x=0; if s mod 7=0 then writeln(‘Yes’) else writeln(‘No’); Readln; end;; repeat循环和while循环的区别 ①在repeat语句的结构中，布尔表达式求值在计算操作之后；而在while语句中，布尔表达式求值在计算操作之前，也就是说repeat循环至少要执行一次循环体。 ②while语句的成分语句只能是一个语句，因此，当重复动作包含多个语句时，要用begin和end 先使它变成一个复合语句。而repeat语句的保留字repeat和until已经起到语句括号作用，可以包含多个语句而无须用begin和end。 ③repeat语句中，是当布尔表达式为true时才