while语句用于"当满足某一条件时重复执行语句"的情况。while语句的语法格式：
while 布尔表达式 do 语句；
循环结束条件在进入循环体之前测试，若最初的测试值为false，则根本不进入循环体。为了能使while重复能终止，循环体中一定要有影响布尔表达式的操作，否则该循就是一个死循环。
说明：
语句可以是一条语句或是一组语句，如果是一组语句时，这组语句必须使用Begin … End标识符来限定，写成复合语句。
例4：计算从0到某个数之间的和。
Function sums(limit);
begin
  sum:=0;
  num:=0;
  while num<=limit do
  begin
    sum:=sum+num;
    num++;
  end;
  return sum;
end;