main=interact(>>= \x->max[x|x/='0']$['1'..x]>>[x|x<':'])