Помогите решить в паскаль
Составьте программу для вычисления суммы
e^1+e^2+e^3+...e^n

// PascalABC.NET 3.1, сборка 1250 от 28.05.2016begin  Writeln('S=',Range(1,ReadInteger('n=')).Select(x->exp(x)).Sum)end.Тестовое решениеn= 20S=767520036.540017