diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..d8df833 --- /dev/null +++ b/.gitignore @@ -0,0 +1,4 @@ +*.exe +*.o +*.swp +*.hi diff --git a/e1/e1.ghc.hs b/e1/e1.ghc.hs new file mode 100644 index 0000000..3846ca8 --- /dev/null +++ b/e1/e1.ghc.hs @@ -0,0 +1,7 @@ +import System.IO + +sum35 i acc max | i >= max = acc + | rem i 3 == 0 ||rem i 5 == 0 = sum35 (i+1) (acc+i) max + | otherwise = sum35 (i+1) acc max + +main = print (sum35 1 0 1000) diff --git a/e1/e1.go b/e1/e1.go new file mode 100644 index 0000000..5a32972 --- /dev/null +++ b/e1/e1.go @@ -0,0 +1,15 @@ +package main + +import ( + "fmt" +) + +func main() { + sum := 0 + for i := 1; i < 1000; i++ { + if i%3 == 0 || i%5 == 0 { + sum += i + } + } + fmt.Println(sum) +}