г. User108, пересчет такой
array[1..4,1..5] of integer;
array[i,j]=(i-low(i))*(high(j)-low(j)+1)+ (j-low(j))
array[3,3]=(3-1)*(5-1+1)+(3-1)=12