Паскаль. Списки. Сформировывать списки из N элементов. Добавить элемент А после
Паскаль. Списки. Сформировывать списки из N частей. Добавить элемент А после второго кратного 3м элемента перечня (1, 6, 7, 3*, 5). Удаление первого кратного 3м элемента перечня (1,7,3,А,5). Выполнить сортировку перечня по убыванию. После исполненья каждой операции выводить список на экран.
Задать свой вопрос
// PascalABC.NET 3.4.2, сборка 1790 от 15.09.2018
// Внимание! Если программа не работает, обновите версию!
begin
var L := new Listlt;integergt;;
L.AddRange(Seq(1, 6, 7, 3, 5));
L.Println;
var A := ReadInteger('A=');
var s := L.ToArray.IndexesOf(t -gt; t mod 3 = 0);
var i2 := s.Skip(1).First;
L.Insert(i2 + 1, A);
L.Println;
L.RemoveAt(s.First);
L.Println;
L := L.SortedDescending.ToList;
L.Println
end.
-
Вопросы ответы
Статьи
Информатика
Статьи
Математика.
Физика.
Математика.
Разные вопросы.
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.