• Задан одномерный массив из N чисел. Сосчитать:сумму,произведение и среднее арифметическое всех элементов массива

Ответы 1

  • //PascalABC.NET 3.3,сборка 1611 от 06.01.2018//Внимание! Если программа не работает, обновите версию!begin  var N:=readinteger('Введите N=');  var mas:=ArrRandom(N,-99,99); mas.Println;  Writeln('суммa=',mas.Sum);  Writeln('среднее арифметическое=',mas.Average);  Writeln('произведение=',mas.Aggregate(biginteger(1),(x,y)->x*y));end.
    answer img
    • Автор:

      dji5tr
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years