Найти сумму вида 1/n, где n меняется от 1 до 100 в паскаль

Question

Найти сумму вида 1/n, где n меняется от 1 до 100 в паскаль

Answer 1

// PascalABC.NET 3.4

begin

    SeqGen(100,n->1/n,1).Sum.Println

end.

Будет выведено 5.18737751763962

Comments

мне нужно через репит и тд, ну ладно все равно спасибо