Задается положительное целое число n. нужно вывести произведение его цифр формат входных данных первая строка входного файла содержит ровно одно положительное число n (1< =n< = 10^100)

DASHA135111 DASHA135111    1   01.10.2019 10:00    12

Ответы
ankateren ankateren  09.10.2020 07:32
PascalABC.NET 3.4.2, сборка 1861 от 09.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var s:=ReadLines('data.txt').First.Select(t->t.ToDigit)

     .Aggregate(BigInteger(1),(a,b)->a*b).Println

end.

Пример

10057531504895395788703629698793031096713606951075840000000000000

Файл data.txt дан во вложении
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика