Форум: "Основная";
Текущий архив: 2004.10.24;
Скачать: [xml.tar.bz2];
Вниз
Изминение размера линейного масива Найти похожие ветки
← →
Anwy © (2004-10-08 21:04) [0]У меня возникла проблем. Я не могу изминить размер масива...
var
mass: array[1..100] of integer;
begin
n:=10;
randomize;
for i:=1 to n do begin
mass[i]:=random(100);
end;
for i:=1 to n do begin
if (mass[i] mod 2)<>0 then begin
mass[i]:=mass[i+1];
SetLength(mass,length(mass)-1);
end;
end;
end;
Вот мой код. Узнаём чётное число или нет (1) (mass[i] mod 2)<>0, потом если чётное сдвигаем на один символ в лево (2) mass[i]:=mass[i+1] и уменьшаем размер масива на 1 (3) SetLength(mass,length(mass)-1);
Но вот проблема в том что размер не меняется, в пункте (3) говорит что не совместимые типы.
В чём же проблема??? За ранее спасибо...
← →
Fenik (2004-10-08 21:05) [1]Нужен динамический массив:
mass: array of integer;
← →
Anwy © (2004-10-08 21:36) [2]А можно тогда спросить? Как разрушать динамический масив?
← →
Юрий Зотов © (2004-10-08 21:38) [3]> Anwy © (08.10.04 21:36) [2]
F1 - dynamic arrays. Там и как создавать, и как разрушать, и как длину менять, и все остальное.
← →
Anwy © (2004-10-08 21:48) [4]Спасибо. То что и искал
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.10.24;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.036 c
