Помогите, пожалуйста:В массиве из 8 частей, заполненном числами в спектре от

Помогите, пожалуйста:
В массиве из 8 частей, заполненном числами в диапазоне от -12 до 12, отыскать среднее арифметическое, творенье отриц. чисел, кол-во четных и наибольший(?) элемент
1. творенье массива
2. наполнение массива
3. посчитать
4. вывод
Спасибо)

Задать свой вопрос
1 ответ
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018

// Внимание! Если программа не работает, обновите версию!

begin

  var mas:=ArrRandom(8,-12,12); mas.Println;

 Writeln('среднее арифметическое=',mas.Average);

 Writeln('творение отриц. чисел=',mas.Where(t-gt;tlt;0).Aggregate(biginteger(1),(x,y)-gt;x*y));

 Writeln('кол-во четных=',mas.Where(t-gt;t mod 2=0).Count);

 Writeln('наибольший элемент=',mas.Max);

end.
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт