Ошибка времени выполнения: Индекс находился вне границ массива (pascal)

[dijetol]

Собственно, пытаюсь заполнить динамический массив. Вроде все сделал как в хелпе, но выдает такую ошибку: "Ошибка времени выполнения: Индекс находился вне границ массива".

var 
A:array [,] of real;
m,n,k,i,j:integer;
begin
writeln('введите размер массива mxn');
write('m:'); readln(m); write('n:'); readln(n);
SetLength(a,m,n);
for i:=1 to m do
for j:=1 to n do
readln(a[i,j]);
end.

При m=3 и n=3 при команде length(a) выдает 9, т.е. как бы i и j не могут выпрыгивать за границы
Когда начинаю вводить данные в массив 3х3, то ошибка появляется на моменте, когда надо вводить элемент a[1,2]. pascal abc

[Serge_Bliznykov]

во-первых, у Вас не Pascal ABC, у Вас PascalABC.NET (это совершенно разные версии Паскаля)

во-вторых, динамические массивы (такие, как у Вас), всегда индексируются от нуля.
поэтому надо так:

for i:=0 to m-1 do
for j:=0 to n-1 do
   readln(a[i,j]);

[Аватар]

for i:=0 to m-1 do
for j:=0 to n-1 do