main = readLn >>= print . ( until(((==).head>>=all).show)(+1)>>=(-) )
123
99
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!