Ответы
Ответ дал:
0
Не знаю, как на казахском это делают, а по-русски вот так, например:
// PascalABC.NET 3.2, сборка 1338 от 16.11.2016
begin
Writeln(Range(2,100,2).Select(x->1/x).Sum)
end.
Результат
2.24960266916471
// PascalABC.NET 3.2, сборка 1338 от 16.11.2016
begin
Writeln(Range(2,100,2).Select(x->1/x).Sum)
end.
Результат
2.24960266916471
Вас заинтересует
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад