массивы и желательно не очень размерные, ищу ответ на вопрос Опции

[Airon]

Люди, люди, человеки!!! расскожите как задовать массив [1..k].
тоесть с неопределённым верхним пределом??!

[Digitalator]

Если длина массива изменяется относительно редко(или вообще не изменяется) и ненакладно при каждом изминении копировать весь массив, то целесообразно использовать такую конструкцию

Код

var i,size:byte;
type TMyArray=array [0..0] of ArrayType;
var  MyArray:^TMyArray;
begin
size:=5;
getmem(MyArray, size*sizeof(integer));

MyArray^[0]:=1;
MyArray^[size-1]:=2;
for i:=0 to size-1 do writeln(MyArray^[i]);
freemem(MyArray, size*sizeof(ArrayType) );
end.

недостаток - воизбежание ошибок неообходимо в качестве индекса массива брать только переменные.

Сообщение отредактировано: Digitalator - 18.02.2005 20:08