Заполнить массив из 12 элементов случайными числами - вопрос №128339692 от sandra5566 03.04.2023 18:55

Question

Информатика: Заполнить массив из 12 элементов случайными числами в интервале [-12..12] и выполнить циклический сдвиг влево отдельно для 1-й и 2-й половин массива.

sandra5566 · Answer

// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ArrRandom(12,-12,12); a.Println;
a:=a[1:6]+a[:1]+a[7:]+a[6:7]; a.Println
end.

Пример
3 12 5 -2 -5 4 0 1 -8 -3 -4 -12
12 5 -2 -5 4 3 1 -8 -3 -4 -12 0