4 lines
163 B
Common Lisp
4 lines
163 B
Common Lisp
CL-USER> (sum i 1 100 (/ 1 i))
|
|
14466636279520351160221518043104131447711/2788815009188499086581352357412492142272
|
|
CL-USER> (float (sum i 1 100 (/ 1 i)))
|
|
5.1873775
|