В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
F92120554651
F92120554651
19.11.2021 17:30 •  Информатика

Найдите сумму произведений и среднее значение элементов массива

Показать ответ
Ответ:
oleg059
oleg059
08.10.2020 18:35
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
  Writeln('Сумма = ',a.Sum,', произведение = ',
      a.Aggregate(BigInteger(1),(p,q)->p*q),
      ', среднее = ',a.Average)
end.

Пример
n= 17
49 -31 46 61 -87 18 -64 -48 66 64 -37 56 43 -52 13 28 -78
Сумма = 47, произведение = -11393046129075182950686916608, среднее = 2.76470588235294
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота