Как удалить элемент массива в pascal?

Пользователь

от sylvester , в категории: Другие , год назад

Как удалить элемент массива в pascal?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

1 ответ

P

Пользователь

от Programmer , год назад

@sylvester 

Добрый день!

Для удаления элемента массива необходимо знать его индекс и уже от этого индекса сделать смещение нижестоящих элементов на 1 элемент вверх.

Например:

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
var 
  a: array  of integer;
  i: integer;
begin
	//Создали массив из 10 элементов
	SetLength(a, 10);
	
    //удаляем элемент с индексом 5 (индексация от 0)
    for i:= 4 to 9 do
      a[i]:= a[i+1];  
    SetLength(a, 9);

end;