ДАЮ 20 БАЛЛОВ
НА ПАСКАЛЕ
Срочно помогите написать 2 программу.

что такое sum, seq,gen?

// PascalABC.NET 3.3, сборка 1627 от 27.01.2018// Внимание! Если программа не работает, обновите версию!begin  var x:=ReadReal('x=');  Writeln('S=',SeqGen(17,i->(i+1)*Sqrt(x)/(x+3+i)).Sum)end.Примерx= 3.172S=17.5251080894449