Question

Дан целочисленный массив из 100 элементов. Элементы массива могут принимать произвольные значения (-100 до 100). Напишите программу, которая определяет сумму элементов первой и второй половины массива. Вывести результат.

Answer 1

//PascalABC.NET 3.4.2

begin

 var ar := arrrandom(100, -100, 100);

 ar.Println.Take(5).Sum.Println;

 ar.TakeLast(5).Sum.Println;

end.