Difference between revisions of "Basic Pascal Tutorial/Chapter 3/REPEAT..UNTIL/zh CN"

From Free Pascal wiki
Jump to navigationJump to search
m (Fixed syntax highlighting; removed categories included in template)
m (Kai Burghardt moved page REPEAT..UNTIL/zh CN to Basic Pascal Tutorial/Chapter 3/REPEAT..UNTIL/zh CN: tidy up main name space: create subpage hierarchy for basic Pascal tutorial [cf. [[Special: Perm...)
(No difference)

Revision as of 03:59, 3 February 2022

│ български (bg) │ English (en) │ français (fr) │ 日本語 (ja) │ 中文（中国大陆）‎ (zh_CN) │

REPEAT..UNTIL循环 (原作者: Tao Yue, 状态: 未更改)

先循环后判断： 

repeat
  语句1;
  语句
until 逻辑表达式;


在repeat循环中，复合语句是内置的，因此，你不需要使用begin-end。另外，直至表达式值为真退出循环。

REPEAT循环被称之为先循环后判断，任何情况下，循环至少执行一次。 

var
    sum,count : integer;

begin
    sum := 0;
    count := 0;

    repeat
        count := count + 1;
        sum := sum + count
    until (count >= 100);

    writeln('sum=', sum);
end.
上一页 目录 下一页
Retrieved from "http://wiki.freepascal.org/index.php?title=Basic_Pascal_Tutorial/Chapter_3/REPEAT..UNTIL/zh_CN&oldid=150473"