Дано целое число n 0 найти произведение 1.1 1.2 1.3 n сомножителей

Question

Дано целое число n 0 найти произведение 1.1 1.2 1.3 n сомножителей

Answer 1

PascalABC.NET 3.4.0, сборка 1670 от 23.05.2018
Внимание! Если программа не работает, обновите версию!

begin
  SeqGen(ReadInteger('n='),i->i+1,10).Select(i->i/10)
      .Aggregate(1.0,(a,b)->a*b).Println
end.

Пример
n= 15
4274.47366714368