diff options
| author | Charles <sircharlesaze@gmail.com> | 2019-08-11 22:36:40 +0200 |
|---|---|---|
| committer | Charles <sircharlesaze@gmail.com> | 2019-08-11 22:36:40 +0200 |
| commit | 6b16d921543a62d880171791d39bcc58560785fa (patch) | |
| tree | d47f5a23a52612107ddcc280c9bd128be7d1070f /haskell/006-sum_square_difference.hs | |
| parent | 7b624de8e3e3637a07364f992c1d7e4185e4a872 (diff) | |
| download | project_euler-6b16d921543a62d880171791d39bcc58560785fa.tar.gz project_euler-6b16d921543a62d880171791d39bcc58560785fa.tar.bz2 project_euler-6b16d921543a62d880171791d39bcc58560785fa.zip | |
haskell problems 001 -> 006
Diffstat (limited to 'haskell/006-sum_square_difference.hs')
| -rw-r--r-- | haskell/006-sum_square_difference.hs | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/haskell/006-sum_square_difference.hs b/haskell/006-sum_square_difference.hs new file mode 100644 index 0000000..3c277af --- /dev/null +++ b/haskell/006-sum_square_difference.hs @@ -0,0 +1,18 @@ +-- Sum square difference + +-- Problem 6 +-- The sum of the squares of the first ten natural numbers is, + +-- 1^2 + 2^2 + ... + 10^2 = 385 +-- The square of the sum of the first ten natural numbers is, + +-- (1 + 2 + ... + 10)^2 = 55^2 = 3025 +-- Hence the difference between the sum of the squares of the first ten natural +-- numbers and the square of the sum is 3025 − 385 = 2640. + +-- Find the difference between the sum of the squares of the first one hundred +-- natural numbers and the square of the sum. + + +main = do + print (sum [1..100] ^ 2 - sum (map (^2) [1..100])) |