Krautspace/project-euler
Archived
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

added some solutions in racket, deuglyfied 14

Browse source
This commit is contained in:
Lowl3v3l 2017-06-06 20:29:13 +02:00
parent 5f58ca8c87
commit a6770f6bca
4 changed files with 41 additions and 16 deletions
Download patch file Download diff file Expand all files Collapse all files

4
16/euler16.rkt Normal file
View file

@ -0,0 +1,4 @@
#lang racket
(foldl + 0 (map (λ (x) (- (char->integer x) 48))
(string->list (number->string (expt 2 1000)))))