Составить программу. Найти произведение N первых натуральных чисел кратных 11.

0 голосов
9 просмотров

Составить программу. Найти произведение N первых натуральных чисел кратных 11.


Информатика (103 баллов) | 9 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018

Внимание! Если программа не работает, обновите версию!

begin

 var n := ReadInteger('N=');

 SeqGen(N, 11, t -> t + 11).Aggregate(BigInteger(1), (i, j)-> i * j).Println

end.

N= 21

378085741958289664546285217171284131840000

(654k баллов)