Выполнить сортировку элементов, записанных на нечётных - вопрос №9367868 от Karina25052005 20.01.2023 04:04

Question

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

Karina25052005 · 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.