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

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.