Заполнить массив случайным образом, состоящий из 12 - вопрос №12413482655 от началось1939 11.09.2022 10:31

Question

Информатика: Заполнить массив случайным образом, состоящий из 12 элементов целого типа (диапазон от -40 до 40). Вывести новый массив, заменив значение пятого элемента среднеарифметическим исходного массива.

началось1939 · Answer

PascalABC.NET beginvar a := ArrRandom(12,-40,40); a.Println; Arr(a[:4]+a.Average.Round+a[5:12]).Print;end.

или, можно без округления:

beginvar a := ArrRandom(12,-40,40); a.Println; Print(a[:4].JoinToString,a.Average,a[5:12].JoinToString);end.

и если вдруг выводить нужно именно массив:

begin var a := ArrRandom(12,-40,40); a.Println; Arr(a[:4].Select(x->x/1)+a.Average+a[5:12].Select(x->x/1)).Print; end.

Пример работы:

Заполнить массив случайным образом, состоящий из 12 элементов целого типа (диапазон от -40 до 40). В