Pascal - Динамические структуры данных
Дан список, содержащий натуральные числа. Удалить из него элементы, кратные заданному числу k.
// Решение данной задачи уже есть на просторах интернета, но мне надо чтобы было решено по теме динамические структуры данных...
Прошу помощи о великие разумы...
Ответы
Ответ дал:
0
// 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.
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.
Приложения:
![](https://st.uroker.com/files/ada/ada61bff149ec0531ce9a1a4e44f2221.jpg)
Вас заинтересует
1 год назад
1 год назад
8 лет назад
8 лет назад
8 лет назад