なんか昨日からあちこちで見かけるので書いてみた。久しぶりの Haslellで。あと,増田で剰余は使うな,と言ってるから使わない。
fizz = cycle ["","","Fizz"] buzz = cycle ["","","","","Buzz"] f "" n = show n f s _ = s main = mapM_ putStrLn $ zipWith f (zipWith (++) fizz buzz) [1..100]
あなごるじゃないから短くするのはやらない。
ピンバック: FizzBuzz in Elixir | blog.PanicBlanket.com
メールアドレスが公開されることはありません。 ※ が付いている欄は必須項目です
コメント ※
名前 ※
メール ※
サイト
Δ
このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。
ピンバック: FizzBuzz in Elixir | blog.PanicBlanket.com