массив из строк, и формирование вектора Опции

[>hamka<]

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

Код

write('Введите количество сортируемых цифр ( не больше 10 ) --> ');
readln(n);
for I:=1 to length(n) do
begin
chislo2:=ord(n[i])-48;chislo:=chislo*10; chislo:=chislo2+chislo;
end;
if (chislo > 10) or (chislo=0) or (chislo2 < 0) or (chislo2 > 9) then
writeln('Некорректное значение');
k:=0;
for j:=1 to chislo do
begin
write('Введите ', j, '- ое число --> ');
readln (a[j]);
for s:=1 to length(a[j][s]) do
begin
ch2:=ord(a[j][s])-48; ch:=ch*10; ch:=ch2+ch; end;
writeln(ch);
....

если они разграничиваются ( ведь массив же ), то где же моя ошибка ? =((

[>hamka<]

Перенесено из темы "Формирование вектора"

этот алгорит проверки на "не число" не в цикле у меня работает. А потом у меня должно происходить формирование вектора. И здесь такая ситуация-> с первым числом все нормально, а потом происходит выход из цикла. Идет переход на формирование вектора.

Код

...
begin
for i:=1 to chislo do
begin
Z:
write('Введите ', i, '- ое число --> ');
readln (a[i]);
for j:=1 to length (a[i]) do
begin
l:=ord (a[i][j])-48;
if (l< 0) or (l> 9) then begin writeln('Некорректное значение');
goto Z; end; end;
for i:=1 to chislo do
b[i]:=PEREVOD(a[i]);
SORTIROVKA (chislo,b);
end;
...

почему это происходит? и как правильно доделать эту задачу. Мне нужно, чтобы дальше было - "введите <cлед. число> и т.д.