Создать массив вещественных чисел. Вычислить творение элементов массива с нечетными

PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018

Внимание! Если программка не работает, обновите версию!

begin

 var a := SeqRandomReal(ReadInteger('n='), -99, 99)

     .Select(t -gt; Round(t, 2)).ToArray;

 a.Println;

 a.Where((v, i)-gt; i.IsEven).Aggregate(1.0, (p, q)-gt; p * q).Println;

 a.Sort;

 a.Println

end.