Дан массив из 8 частей . Найти а) сумму всех частей

Дан массив из 8 частей . Найти а) сумму всех частей массива ;б) произведение всех элементов массива ;в) среднее арифметическое всех частей массива

Задать свой вопрос
1 ответ
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программка не работает, обновите версию!

begin
  var a:=ArrRandom(8,-10,10); a.Println;
  Writeln('S=',a.Sum,', П=',a.Aggregate(1,(x,y)-gt;x*y),', m=',a.Average)
end.

Пример
9 -1 6 -10 0 -6 8 1
S=7, П=0, m=0.875

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


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

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

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

Войти на сайт