Регистрация
Miller48
26.08.2022 23:46
Информатика
Есть ответ 👍

ПО ИНФОРМАТИКЕ КРОССВОРД

​

198
386
Посмотреть ответы 1

Ответы на вопрос:

Vtscrntfigduufs
Vtscrntfigduufs
4,7(37 оценок)
Pascalabc.net 3.3.5, сборка 1662 от 29.04.2018 внимание! если программа не работает, обновите версию! begin   var n: =readinteger('n=');   var a: =arrrandom(n,-99,99); a.println;   writeln('искомое произведение ',           range(2,n-1,3).select(i-> a[i]).aggregate(biginteger(,q)-> p*q)) end. пример n= 20 -9 -60 -35 90 97 68 -2 25 -69 80 -13 -24 22 -48 33 40 -75 -78 47 -89 искомое произведение 10144854720

Популярно: Информатика