RosettaCodeData/Task/Eulers-constant-0.5772.../Picat/eulers-constant-0.5772...-2.picat
2023-07-01 13:44:08 -04:00

5 lines
74 B
Text

e2(N) = E-log(N) =>
E = 1,
foreach(I in 2..N)
E := E + 1/I
end.