N:=stdin upToEnd asNumber.[(N:=N printNl-(10 raisedTo:(N+0.1floorLog:11)))<0]whileFalse