Пользователь вводит с клавиатуры целые положительные числа большие 1, которые перемножаются в программе. составьте программу вычисляющую значение произведения вводимых значений. условием окончания ввода данных является ввод значения меньшего или равного 1. (сделать нужно через паскаль) 40 .

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  ReadSeqIntegerWhile(t->t>1).Aggregate(BigInteger(1),(m,n)->m*n).Println
end.

Пример
3564
523
7
13632
634534
123236
342
1
4756807744621594586394624