import Text.Printf main = do n <- readLn :: IO Int if n == 0 then print 0 else printf "0.%s\n" $ take n (cycle "142857")