Løsning i Haskell, som jeg (sammen med alle andre funksjonelle språk) omtrent aldri har rørt før... noe jeg regner med er tydelig.
Kode
fizzbuzz :: Int -> String
fizzbuzz n
| 5 `divs` n && 3 `divs` n = "FIZZBUZZ"
| 5 `divs` n = "buzz"
| 3 `divs` n = "fizz"
| otherwise = show n
where x `divs` n = n `mod` x == 0
--resultat gis ved:
map fizzbuzz [1..100]
Sist endret av robhol; 19. januar 2014 kl. 15:40.