Delphi阶乘与三种循环语句应用:
 

1.阶乘与For<条件> do 循环；

2.阶乘与Repeat...Until<条件>循环；

3.阶乘与While<条件> do 循环。