Not working halp.

What is wrong with this?

Procedure tabletoarray;
begin
cindex:=0;
for bindex:=1 to 5 do
begin
for aindex:=1 to 10 do
begin
cindex:=cindex+1;
table[aindex,bindex]:=sortarray[cindex];
end;
end;
writeln;
end;

not working halp!It wont reed in the numbers properly.

Do array indexes start at 1 in your shitty language?