seliaste/projecteuler
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fixed formatting

Browse source
This commit is contained in:
Aéna Aria 2025-12-22 17:08:24 +01:00
parent a373abfdf1
commit 04c666a219
10 changed files with 45 additions and 29 deletions
Download patch file Download diff file Expand all files Collapse all files

2
hs/1.hs
View file

@ -1,2 +1,2 @@
main = do
putStrLn (show (sum [x | x <- [1..999], x `mod` 3 == 0 || x `mod` 5 == 0]))
putStrLn (show (sum [x | x <- [1..999], x `mod` 3 == 0 || x `mod` 5 == 0]))

2
hs/5.hs
View file

@ -3,4 +3,4 @@ divisible x y = x `mod` y == 0
smallest x = if all (divisible x) [2..20] then x else smallest (succ x)
main = do
print(smallest 1)
print(smallest 1)

2
hs/6.hs
View file

@ -1,2 +1,2 @@
main = do
print (sum [1..100] ^ 2 - sum [x ^ 2 | x <- [1..100]])
print (sum [1..100] ^ 2 - sum [x ^ 2 | x <- [1..100]])