PascalABC.NET

Ответ:

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

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

// PascalABC.NET 3.6.3

begin

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

 a.Println;

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

end.