Помогите пожалуйста с паскалем!) Дано число N. Hайдите значение x, x = (1*3*5*...*N)/(1 = 3 = 5 = ...+N) (N-нечетное число)

// PascalABC.NET 3.2, сборка 1356 от 04.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var r:=Range(1,ReadInteger(n=),2);
  var p:=r.Aggregate(BigInteger(1),(i,j)-gt;i*j);
  var s:=r.Sum;
  Writeln(x=,p,/,s,=,real(p)/s)
end.

Пример
n= 39
x=319830986772877770815625/400=7.99577466932194E+20