Найдите творенье 10 элементов массива. А (10) целых

Найдите произведение 10 элементов массива. А (10) целых

Задать свой вопрос
1 ответ
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ArrRandom(10,1,15);a.Println;
Writeln(a.Aggregate(Biginteger(1),(x,y) -gt; x*y));
end.

Пример:
15 8 1 6 5 10 14 13 13 1
85176000



, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт