rail, 138 bytes

Result

WA

Code [DL]

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

stdin

9189129582846956216417061073092955780473415706457483608011918792092572683560132663592347992380481533

stdout

3000000000011111111111222222222233333333344444444555555555566666666667777777778888888888999999999999

stderr

strace