Выполнить сортировку элементов, записанных на нечётных - вопрос №9368436 от wasuablezko 18.05.2022 06:53

Question

Информатика: Выполнить сортировку элементов, записанных на нечётных местах. в программе pascal.. 50

wasuablezko · Answer

PascalABC.NET 3.4.2, сборка 1827 от 08.10.2018Внимание! Если программа не работает, обновите версию!

begin

var a := ArrRandom(ReadInteger('n='), -50, 50);

a.Println;

a := a[::2].Sorted.Interleave(a[1::2]).ToArray;

a.Println

end.