procedure test;vari, j: integer;beginj:=0;for(int i = 0 to 10) dobegin j:= j + i;end;end; 对于这个函数，I是循环控制变量，J是累加变量。主要功能就是循环从1到10，累加这些值。付给J最后J存放的是累加得值
