Дан массив (1..7). найти сумму кубов всех элементов массива

Question

Дан массив (1..7). найти сумму кубов всех элементов массива

Answer 1

PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018

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

begin

 var a := ReadArrInteger(7);

 a.Select(t -> t ** 3).Sum.Println

end.

---

Answer 2

C#. Arr - массив из 7 элементов. Пример работы на изображении.

using System;

using System.Linq;

namespace sum_of_cube_30019640

{

   class Program

   {

       static void Main(string[] args)

       {

           int[] Arr = { 4, 7, 1, 6, 6, 3, 2 }; // <-- Исходный массив здесь</p>

           double Sum = Arr.Select(x => Math.Pow(x, 3)).Sum();

           Console.WriteLine("Сумма кубов элементов: {0}", Sum);

       }

   }

}

---