starting=1 bse=gets.to_i while gets n=$_.to_i(bse) n+=starting-2 digits=1 expbase=1 while (x=expbase*(digits*(bse-1)))<=n n-=x digits+=1 expbase*=bse end num=expbase+n/digits #d=digits-1-n%digits #d.times{num/=bse} #puts num%bse puts num.to_s(bse)[-(digits-1-n%digits)-1] end