ソースを参照

Re-add FizzBuzz example

Matt Coles 9 年 前
コミット
042e2635b0
共有1 個のファイルを変更した14 個の追加0 個の削除を含む
  1. 14 0
      fizzbuzz.mc

+ 14 - 0
fizzbuzz.mc

@@ -0,0 +1,14 @@
1
+(include str)
2
+(def fizzbuzz
3
+  (assign i 1)
4
+  (repeat $1
5
+    (assign result "")
6
+    (if (eq (modulo i 3) 0) (assign result (str::concat result "Fizz")))
7
+    (if (eq (modulo i 5) 0) (assign result (str::concat result "Buzz")))
8
+    (if (eq result "") (assign result i))
9
+    (log result)
10
+    (assign i (add i 1))
11
+  )
12
+)
13
+
14
+(fizzbuzz 100)