Question

pascal 语言中的FOR循环语句的结构

求九九乘法表的 pascal语言的程序。。

顺便讲一下FOR循环的结构

Answer 1

Pascal语言中for循环语句是计数型循环，所以可以知道循环的次数，结构如下：

1. for <变量>：=<初值> to <终值> do <循环体>；

2. for <变量>：=<初值> downto <终值> do <循环体>；

解释：

1. 在第一种格式中，<变量>先被赋值于<初值>，然后执行一次<循环体>，之后<变量>自加1，再执行一次<循环体>……一直到<变量>等于<终值>，执行最后一次<循环体>后，结束循环。

2. 在第二种格式中，<变量>先被赋值于<初值>，然后执行一次<循环体>，之后<变量>自减1，再执行一次<循环体>……一直到<变量>等于<终值>，执行最后一次<循环体>后，结束循环。

注意事项：

1. 其中的<变量>的数据类型必须为顺序类型，但不能为int64型，<初值>与<终值>也得是顺序类型；

2. 如果是第一种格式，<初值>只有小于或等于<终值>时才能执行循环体，如果<初值>大于<终值>，则跳过该for循环语句而不执行；

   如果是第二种格式，<初值>只有大于或等于<终值>时才能执行循环体，如果<初值>小于<终值>，则跳过该for循环语句而不执行；

3. 在<循环体>中，不可给<变量>赋值，否则会使得循环提前结束或进入死循环；

4. 在for循环语句中，允许嵌套。
   

Answer 2

Pascal语言中for循环语句是计数型循环，所以可以知道循环的次数，结构如下：

for <变量>：=<初值> to <终值> do <循环体>；

for <变量>：=<初值> downto <终值> do <循环体>；

解释：

在第一种格式中，<变量>先被赋值于<初值>，然后执行一次<循环体>，之后<变量>自加1，再执行一次<循环体>……一直到<变量>等于<终值>，执行最后一次<循环体>后，结束循环。

在第二种格式中，<变量>先被赋值于<初值>，然后执行一次<循环体>，之后<变量>自减1，再执行一次<循环体>……一直到<变量>等于<终值>，执行最后一次<循环体>后，结束循环。

注意事项：

其中的<变量>的数据类型必须为顺序类型，但不能为int64型，<初值>与<终值>也得是顺序类型；

如果是第一种格式，<初值>只有小于或等于<终值>时才能执行循环体，如果<初值>大于<终值>，则跳过该for循环语句而不执行；

如果是第二种格式，<初值>只有大于或等于<终值>时才能执行循环体，如果<初值>小于<终值>，则跳过该for循环语句而不执行；

在<循环体>中，不可给<变量>赋值，否则会使得循环提前结束或进入死循环；

在for循环语句中，允许嵌套。

Answer 3

var i,j:integer;
begin
for i:=1 to 9 do
begin
for j:=1 to i do write(i,'*',j,'=',i*j:2,' ');
writeln;
end;
end.

讲解for循环如下：

for循环是开界的。它的一般形式为: for(<初始化>; <条件表过式>; <增量>) 语句; 初始化总是一个赋值语句, 它用来给循环控制变量赋初值; 条件表达式是一 个关系表达式, 它决定什么时候退出循环; 增量定义循环控制变量每循环一次后 按什么方式变化。这三个部分之间用";"分开。 例如: for(i=1; i<=10; i++) 语句; 上例中先给i赋初值1, 判断i是否小于等于10, 若是则执行语句, 之后值增 加1。再重新判断, 直到条件为假, 即i>10时, 结束循环。
　　注意:
　　1. for循环中语句可以为语句体, 但要用"{"和"}"将参加循环的语句括起来。
　　2. for循环中的"初始化"、"条件表达式"和"增量"都是选择项, 即可以缺省, 但";"不能缺省。省略了初始化, 表示不对循环控制变量赋初值。 省略了条件 表达式, 则不做其它处理时便成为死循环。省略了增量, 则不对循环控制变量进 行操作, 这时可在语句体中加入修改循环控制变量的语句。
　　3. for循环可以有多层嵌套。
　　例:
　　#include<stdio.h>
　　int main(void)
　　{
　　int i, j, k;
　　printf("i j k\n");
　　for (i=0; i<2; i++) for(j=0; j<2; j++) for(k=0; k<2; k++)
　　printf(%d %d %d\n", i, j, k);
　　return 0;
　　}
　　输出结果为: i j k 0 0 0 0 0 1 0 1 0 0 1 1 1 0 0 1 0 1 1 1 0 1 1 1

Answer 4

这个是object pascal 的。
var i,j:integer;
begin
for i:=1 to 9 do
begin
for j:=1 to i do begin
write(IntToStr(i)+'*'+IntToStr(j)+'='+IntToStr(i*j) : 8);
end;
writeln;
end;
readln;
{ TODO -oUser -cConsole Main : Insert code here }
end.

Answer 5

3. for循环可以有多层嵌套。
　这不是pascal 了吧，是c语言吧！肯定是会的太多了，弄混了！