rail, 131 bytes

Result

WA

Code [DL]

$ 'j'      #(c){j}(x)-@
 --(!x!)(!c!)(c)(x)g<
              #(x)(c)-@
$'main'@
 |@     \1uo-
 9 \{j}- q   >#
 1  i   >0--/
 \-ai-e/

stdin

3763424505217424108583849185540356841709577936053579909165560841393020259623643301435729347006866329

stdout

9000000000000111111122222222333333333333334444444444455555555555556666666666777777778888888999999999

stderr

strace