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

keram1it228 keram1it228    1   02.07.2020 04:02    4

Ответы
PavelSahka PavelSahka  24.08.2020 23:45
PascalABC.NET begin var z := ArrRandom(200, 1, 50); z.Println; z[4::5].Aggregate(BigInteger.One,(p,x)->(p*x)).Print end.

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


В ПАСКАЛЕ. В массиве чисел z1, z2, ..., z200 найти произведение чисел z5, z10, ..., z200.
ПОКАЗАТЬ ОТВЕТЫ
йАнанасик11 йАнанасик11  24.08.2020 23:45

// PascalABC.NET 3.6.3

begin

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

 a.Println;

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

end.


В ПАСКАЛЕ. В массиве чисел z1, z2, ..., z200 найти произведение чисел z5, z10, ..., z200.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика