ONLY DO WHAT ONLY YOU CAN DO

こけたら立ちなはれ 立ったら歩きなはれ

FizzBuzz

Haskell で FizzBuzz

Compile and Execute Programs Online fizzbuzz :: Int -> String fizzbuzz x | x `mod` 15 == 0 = "FizzBuzz" | x `mod` 3 == 0 = "Fizz" | x `mod` 5 == 0 = "Buzz" | otherwise = show x main = do putStr $ unlines $ map fizzbuzz [1..100] Compiling t…

SQL で FizzBuzz

with a as ( select 0 as n from dual union all select 1 from dual ) select case when mod(n, 3) = 0 and mod(n, 5) = 0 then 'FizzBuzz' when mod(n, 3) = 0 then 'Fizz' when mod(n, 5) = 0 then 'Buzz' else to_char(n) end from ( select a01.n + a02…