Question

Помогите пожалуйста. В ПАСКАЛЕ. В массиве чисел z1, z2, ..., z200 найти произведение чисел z5, z10, ..., z200.

Answer 1

PascalABC.NET

Ответ:

• begin
• var z := ArrRandom(200, 1, 50);
• z.Println;
• z[4::5].Aggregate(BigInteger.One,(p,x)->(p*x)).Print
• end.

Пример работы:

Answer 2

// PascalABC.NET 3.6.3

begin

 var a := ArrRandom(200, 1, 50);

 a.Println;

 a[4::5].Product(p -> BigInteger(p)).Print

end.