Question

Сделать на Паскале

№1. Вычислить сумму и произведение элементов массива, количество элементов которого равно 50, элементы массива задаются случайным образом. Результат вывести на экран.

Answer 1

// PascalABC.NET

begin

   var a := ArrRandom(50, -99, 99);

   a.Println;

   Println('Сумма', a.Sum);

   Print('Произведение', a.Select(p -> real(p)).Product)

end.

Answer 2

Ответ:

Во вложении.

Объяснение: