结构化程序设计03 - 零基础入门学习Delphi12
结构化程序设计03
让编程改变世界
Change the world by program
循环结构语句
顺序结构和选择结构只能完成一些简单功能，实际的程序也很少只由顺序结构和选择结构组成。 例如小甲鱼仍然很清楚记得大学军训的时候……由于不守纪律调戏小女生，教官大人让我做五十个俯卧撑，还是要介样子做…… [caption id="attachment_565" align="aligncenter" width="225"]
小甲鱼[/caption]
如果我们把这件事情当成一个程序来设计，用我们之前学过的顺序结构和选择结构，我们得出这样的算法：
做（俯卧撑）-> 加一次 -> 判断（是否等于50）
如果是，则解放；
如果未等于五十，则继续做（俯卧撑）-> 加一次…… …… …… ……
那么，我们就非常渴望有一个结构可以来解放劳动力，这样才能够获取更大的生产力！ 就在小甲鱼的一上一下的过程中，循环结构语句就这样诞生了！ 用计算机解决许多问题都必须通过循环结构，可以说没有循环结构就没有程序设计。 从程序设计的角度来看，“循环”是指某一个程序段重复执行若干次，被重复执行的程序段称“循环体”。 在程序中为控制循环的执行，通常需要设定一个条件，当该条件成立时执行循环，当条件不成立时，退出循环。 我们把这样的控制循环是否执行的条件称“循环条件”或“循环控制条件”。 在刚才的实例中，是否达到五十次成为判断的循环条件。我们根据这个思路，得出了以下这段伪指令代码！伪指令表示：
[codesyntax lang="delphi"]当（ 次数 < 50 ）
Begin
做俯卧撑;
次数加一;
Goto 当（ 次数 < 50 ）;
End;
[/codesyntax]
Delphi 7实现循环结构的语句一共有3种，分别是While语句、Repeat语句和For语句。
1）While 语句
While 语句就是当条件成立（为True）时，执行循环，而在条件不成立（为False）时，将退出循环，不再执行循环体。 While 语句的格式很像我们刚才的伪指令。 While语句的语法格式及功能如下。 [格式]： [codesyntax lang="delphi"]While（循环条件） do
循环体;
[/codesyntax]
[说明]：执行While语句时，首先计算“循环条件”，若其值为True，则执行循环体中的语句，否则不执行循环体中的语句，跳出循环（或者称终止循环）
