Codeforces 110B - B. Lucky String

110B - B. Lucky String

calc :: Int -> String
calc n = take n $ cycle "abcd"

main = do s <- getLine
          putStrLn $ calc $ read s