import Data.Array
import Data.Char
import Data.List
import Data.Tuple
main :: IO ()
main = putStrLn $ show n ++ "==" ++ radix62 n
  where
    n = 18446744073709551615
radix62 :: (Ix a, Integral a) => a -> String
radix62 n = map (char !) $ reverse $ unfoldr f n
  where
    f 0 = Nothing
    f x = Just $ swap $ x `divMod` radix
    char =
      listArray (0, radix - 1)
                "0123456789abcdefghijklnmopqrstuvwxyzABCDEFGHIJKLNMOPQRSTUVWXYZ"
    radix = 62
 

aW1wb3J0IERhdGEuQXJyYXkKaW1wb3J0IERhdGEuQ2hhcgppbXBvcnQgRGF0YS5MaXN0CmltcG9ydCBEYXRhLlR1cGxlCm1haW4gOjogSU8gKCkKbWFpbiA9IHB1dFN0ckxuICQgc2hvdyBuICsrICI9PSIgKysgcmFkaXg2MiBuCiAgd2hlcmUKICAgIG4gPSAxODQ0Njc0NDA3MzcwOTU1MTYxNQpyYWRpeDYyIDo6IChJeCBhLCBJbnRlZ3JhbCBhKSA9PiBhIC0+IFN0cmluZwpyYWRpeDYyIG4gPSBtYXAgKGNoYXIgISkgJCByZXZlcnNlICQgdW5mb2xkciBmIG4KICB3aGVyZQogICAgZiAwID0gTm90aGluZwogICAgZiB4ID0gSnVzdCAkIHN3YXAgJCB4IGBkaXZNb2RgIHJhZGl4CiAgICBjaGFyID0KICAgICAgbGlzdEFycmF5ICgwLCByYWRpeCAtIDEpCiAgICAgICAgICAgICAgICAiMDEyMzQ1Njc4OWFiY2RlZmdoaWprbG5tb3BxcnN0dXZ3eHl6QUJDREVGR0hJSktMTk1PUFFSU1RVVldYWVoiCiAgICByYWRpeCA9IDYyCg==