1.
for i := 0 to 10 do
begin
  j := i;
  ...;
end;
2.
 for I := 10 Downto 0 do

解决方案 »

  1.   

    Dec(I); //or Inc(I, -1);
      

  2.   

    i:=0;j:=0;
    while (i<10) do
    begin
      .
      .
      .
      inc(i);
      inc(j);
    end;dec(i);
      

  3.   

    for i:=0 to 9 do
      for j:=0 to 9 do
      

  4.   

    for i:=9 downto 0 do
      for j:=9 downto 0 do
      

  5.   

    Dec(I); //or Inc(I, -1);
      

  6.   

    for i:=0 to 9 do 
    begin
        for j:=0 to 9 do 
        begin
        end;
    end;
    for i:=9 downto 0 do 
    begin
        for j:=9 downto 0 do 
        begin
        end;
    end;
      

  7.   

    const n=...
    j := 0;for i :=0 to n do
      inc(j);
      

  8.   

    笑三少同志,你又错了,人家早说了是要同步循环,不是嵌套循环
    在for中为另一个变量赋为循环变量的值是一个解决办法,在Delphi中递减用Downto