for语句举例解释

. . . End.

“循环体”是在begin和end之间或是for循环语句下第一个分号的计算语句，参与循环计算，计算的结果是根据循环变量（i）的终值(n)递增累加、累乘，或是递减累加、累乘。 例如:

var 赋初值：i,x,y:integer; x:=1,y:=2,sum 0 :=0,cj 0:=1; sum,cj:real; 累加求和： begin for i:=1 to 5 do Begin sum:=0;

sum1:= sum0+x+y=0+1+2=3; cj:=1;

sum2:= sum1+x+y=3+1+2=6; x:=strtoint(edit1.Text);

y:=strtoint(edit2.Text); sum3:= sum2+x+y=6+1+2=9; for i:=1 to 5 do sum4:= sum3+x+y=9+1+2=12; begin sum5:= sum4+x+y=12+1+2=15; sum:=sum+x+y; End. cj:=cj*x*y; 累乘求积： edit3.Text:=floattostr(sum); for i:=1 to 5 do edit4.Text:=floattostr(cj); Begin cj1:= cj0*x*y=1*1*2=2; end;

end; cj2:= cj1*x*y =2*1*2=4; cj3:= cj2*x*y =4*1*2=8; cj4:= cj3*x*y =8*1*2=16; cj:= cj*x*y =16*1*2=32; End.