Помогите пжл выполнить задание по информатику в Паскале:1. Выполнить творение первых

PascalABC.NET 3.3
begin
  var N := ReadInteger('Введите N:');
  Println('Произведение первых N нечётных чисел одинаково',
    1.Step(2).Take(N).Aggregate(BigInteger(1), (p, x) -gt; p * x));
  Println('Квадраты первых N естественных чисел:');
  1.To(N).Select(x -gt; x * x).Print;
end.


Пример работы программки:
Введите N: 10
Творение первых N нечётных чисел одинаково 654729075 
Квадраты первых N натуральных чисел: 
1 4 9 16 25 36 49 64 81 100