added old solutions

This commit is contained in:
Aéna Aria 2025-12-22 13:15:04 +01:00
parent 3a4827b082
commit a373abfdf1
14 changed files with 153 additions and 0 deletions

6
hs/5.hs Normal file
View file

@ -0,0 +1,6 @@
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)