Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
8
Task/FizzBuzz/Miranda/fizzbuzz.miranda
Normal file
8
Task/FizzBuzz/Miranda/fizzbuzz.miranda
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
main :: [sys_message]
|
||||
main = [Stdout (lay (map fizzbuzz [1..100]))]
|
||||
|
||||
fizzbuzz :: num->[char]
|
||||
fizzbuzz n = "FizzBuzz", if n mod 15 = 0
|
||||
= "Fizz", if n mod 3 = 0
|
||||
= "Buzz", if n mod 5 = 0
|
||||
= show n, otherwise
|
||||
Loading…
Add table
Add a link
Reference in a new issue