Question

Pascal - Динамические структуры данных

Дан список, содержащий натуральные числа. Удалить из него элементы, кратные заданному числу k.



// Решение данной задачи уже есть на просторах интернета, но мне надо чтобы было решено по теме динамические структуры данных... 
Прошу помощи о великие разумы...

Answer 1

// PascalABC.NET  3.4

begin
  var n:=ReadInteger('Укажите количество элементов в списке:');
  var ds:=SeqRandom(n,1,9).ToList; // динамический список
  ds.Println;
  var k:=ReadInteger('Введите число k:');
  ds:=ds.Where(m->m mod k<>0).ToList;
  ds.Println
end.