Для заданных с клавиатуры значений переменных x и n вычислить (Паскаль)

$\displaystyle Y=\sum_{i=1}^{15} \frac{x^2}{i}=x^2\sum_{i=1}^{15} \frac{1}{i}$

PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!

begin
var x:=ReadReal('x=');
var Y:=x*x*(SeqGen(15,i->1/i,1).Sum);
Writeln(Y)
end.

Пример:
x= 10
331.822899322899