commit f2cd84cffcaaf57448a9a57df16b1b3e4bde747a Author: Dan Ballard Date: Sun Mar 27 10:31:47 2011 -0700 Starting Euler 1: done python, ruby and lisp, working on erlang diff --git a/e1.erl b/e1.erl new file mode 100644 index 0000000..4fa32be --- /dev/null +++ b/e1.erl @@ -0,0 +1,4 @@ +-module(e1). +-export([e1/1]). + +e1( diff --git a/e1.lisp b/e1.lisp new file mode 100644 index 0000000..ed7856a --- /dev/null +++ b/e1.lisp @@ -0,0 +1,5 @@ +(let ((sum 0)) + (loop for i from 2 to 999 do + (if (or (eql (mod i 3) 0) (eql (mod i 5) 0)) + (incf sum i))) + (format t "~d~%" sum)) \ No newline at end of file diff --git a/e1.py b/e1.py new file mode 100755 index 0000000..2fba726 --- /dev/null +++ b/e1.py @@ -0,0 +1,8 @@ +#!/usr/bin/python + +sum = 0 +for i in range(2,1000): + if i % 3 == 0 or i % 5 ==0 : + sum += i + +print sum diff --git a/e1.rb b/e1.rb new file mode 100755 index 0000000..f6f034e --- /dev/null +++ b/e1.rb @@ -0,0 +1,11 @@ +#!/usr/bin/ruby + +sum = 0 + +for i in 2..999 + if i % 3 == 0 or i % 5 == 0 + sum += i + end +end + +print sum.to_s + "\n"