PascalABC.NET 3.5.1 + .NET Framework 4.7.1
begin
Range(ReadInteger('from: '), ReadInteger('To: ')).Aggregate(BigInteger.One, (p, q) -> p*q).Println;
end.
Объяснение:
