Difference between revisions of "Basic Pascal Tutorial/Chapter 3/REPEAT..UNTIL/zh CN"
From Lazarus wiki
Jump to navigationJump to searchm |
Wangyouworld (talk | contribs) m |
||
Line 37: | Line 37: | ||
|[[WHILE..DO/zh_CN|上一页]] | |[[WHILE..DO/zh_CN|上一页]] | ||
|[[Contents/zh_CN|目录]] | |[[Contents/zh_CN|目录]] | ||
− | |[[FOR..IN|下一页]] | + | |[[FOR..IN/zh_CN|下一页]] |
|} | |} | ||
[[Category: Object Pascal Introduction]] | [[Category: Object Pascal Introduction]] | ||
[[Category:zh]] | [[Category:zh]] |
Revision as of 11:45, 12 December 2013
│
български (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.
上一页 | 目录 | 下一页 |