Массив: сформируйте массив, содержащий n элементов, с помощью датчика случайных чисел. - PascalABC.NET
Формулировка задачи:
Помогите сделать, пожалуйста: сформируйте массив, содержащий n элементов, с помощью датчика случайных чисел. Получите новый массив, каждый элемент которого равен среднему арифметическому элементов, стоящих до и после него в исходном массиве. Выведите на экран исходные и полученные результаты
Заранее спасибо!
Решение задачи: «Массив: сформируйте массив, содержащий n элементов, с помощью датчика случайных чисел.»
textual
Листинг программы
uses Arrays;
begin
var n := ReadLnInteger('n = ');
var a := CreateRandomIntegerArray(n, 0, 120);
var s := a.Sum();
var st := a.Select(v -> (s - v) / Pred(n));
Print('Исходный массив: ', a, NewLine + 'Результат: ', st);
end.