Скласти програму обчислення суми чисел виду 1/N, N=1,2,3,4,5,6,7,8,9,10.

Question

Скласти програму обчислення суми чисел виду 1/N, N=1,2,3,4,5,6,7,8,9,10.

Answer 1

PascalABC.NET 3.2:
begin
  print(1.To(10).Select(N->1/N).Sum)
end.

python 3.5:
print(sum(map(lambda x: 1/x, range(1, 11))))