Приветствую всех.
Перейду сразу к делу.
	Код:
	| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | functionGetTimePrefix(N: Integer): String;
 const
   pref: array[0..6] ofstring= (' г. ', ' м. ', ' н. ', ' д. ', ' ч. ', ' мин. ', ' сек. ');
   del: array[0..6] ofInteger= (31536000, 2592000, 604800, 86400, 3600, 60, 1);
 var
   a: array[0..6] ofInteger;
   i: integer;
 begin
   Result := '';
   a[6] := N;
  
   fori := 0to5do
   begin
     a[i] := a[6] divdel[i];
     a[6] := a[6] moddel[i];
     ifa[i] <> 0then
       Result := Result + IntToStr(a[i]) + pref[i]
   end
 end;
 | 
 
После строки
счетчик при первой итерации устанавливается в i=6, а затем спускается вниз. Замечено, что если поставить
то счетчик примет при первой итерации значение i=N+1.
В чем причина?! Более в коде под "i" никакой другой переменной нет. Поясните, пожалуйста