[Мишка-90]

Всем доброго времени суток.
обращаюсь к вам с просьбой направить в нужном направлении.
вот кусочек кода

Код:

d[81] := 0;
       Begin
        for z := 81 + 2 to 91 do
      for i:=5 to StringGrid8.RowCount-32 do d[z] := d[z] + StrToFloat(StringGrid8.Cells[200  ,i]);
     for j := 198 + 2 to 210 do
       for u := 25 + 1 to 30 do
      StringGrid8.Cells[j , u]:= FloatToStr(d[z]);
       End;

мне необходимо чтобы код:

Код:

for i:=5 to StringGrid8.RowCount-32 do d[81] := d[81] + StrToFloat(StringGrid8.Cells[200  ,i]);
     for j := 198 + 2 to 210 do
      StringGrid8.Cells[200 , 26]:= FloatToStr(d[81]);

выполнился 5 раз с шагом 2. вроде бы всё просто, но компилятор говорит, что я пытаюсь выполнить цикл, который уже завершился... не знаю. уже даже не уверен что первый код, который выложил - это лучший вариант из тех которые были.. мозг выключился..
пожалуйста, помогите..

[AlexSku]

Внутри оператора FOR может быть только один оператор, поэтому почаще пиши так:

Код:

for i:= istart to iend do
begin
...
end;

даже если внутри будет только один оператор.
Шаг 2 в цикле не предусмотрен, поэтому вводим новую переменную:

Код:

for i:= 1 to 5 do
begin
  i2:= i * 2; // можно ещё прибавить константу
...
end;

[Мишка-90]

Код:

i2:= i * 2;

у меня были попытки сделать примерно тоже самое, но я это делал не с новой переменной, а пытался умножить саму i
думаю мои ошибки пока связанны с небольшим стажем работы, помощь просить не люблю, но иногда приходится.., большое спасибо AlexSku за советы.